2016 年 10月 31 日随笔档案 - del88

2016年10月31日

自己写的限制文本框TEdit中只能输入数字，新版已经增加了NumbersOnly属性

摘要：我自己写的： procedure TForm4.Edit1KeyPress(Sender: TObject; var Key: Char); begin if not (Key in ['0' .. '9', '.', '-', #8, #10, #13]) then begin Key := #0 阅读全文

posted @ 2016-10-31 18:10 del88 阅读(207) 评论(0) 推荐(0) 编辑

TStringHelper的相关知识、Helper相关细节

摘要：阅读全文

posted @ 2016-10-31 17:53 del88 阅读(182) 评论(0) 推荐(0) 编辑