摘要: //输入事件中将字母设置为大写 if Key in ['a'..'z'] then begin Key := UpperCase(key)[1]; end;//DBGrid排序方法procedure TForm1.DBGridEh1TitleBtnClick(Sender: ... 阅读全文
posted @ 2015-09-16 11:42 冰意 LceMeaning 阅读(318) 评论(0) 推荐(0) 编辑