- 博客(1)
- 收藏
- 关注
RSS订阅原创 Sender 的應用：所有Edit共用一個過濾格式
1. 所有的Edit 都只允許輸入數字，即只可以輸入一次小數點2. 不想對多達幾十個的Edit 都寫onKeyPress 事件那你就寫一個，其它的全部在Object Inspector 中指向這一個：procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);var IntCompIdx: Integer; stText:
2003-07-10 10:04:00
765
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人