5,388
社区成员
发帖
与我相关
我的任务
分享delphi edit输入结束的判断
请教大虾们一个问题，在DELPHI窗体上有一个EDIT，当我在这个EDIT中输入结束的时候，需要对输入的字符做一些判断。假如有一个edit1，我在里面输入‘123’，但该EDIT要求输入的结果要大于‘200’，那如何来实现输入结束时的判断。
...全文
请发表友善的回复…
发表回复
babydog01 2012-02-20
- 打赏
- 举报
在Onexit事件里写代码就可以了。
我看见佛 2012-02-20
- 打赏
- 举报
procedure TForm1.TxtCountExit(Sender: TObject);
begin
if strToInt(TxtCount.Text) <= 200 then
ShowMessage('输入的结果要大于200')
end;
begin
if strToInt(TxtCount.Text) <= 200 then
ShowMessage('输入的结果要大于200')
end;
我看见佛 2012-02-20
- 打赏
- 举报
procedure TForm1.xxxExit(Sender: TObject);
begin
end;
OnExit事件
begin
end;
OnExit事件
kaikai_kk 2012-02-20
- 打赏
- 举报
在保存的時候判断，可以事先在keypress中处理只能输入数字
younerest 2012-02-20
- 打赏
- 举报
谢谢各位了
右脚小拇指 2012-02-20
- 打赏
- 举报
Edit控件是在Onexit 事件下可以的.
像金额数字类的.可以用cxCurrencyEdit. 控件, 更好用.
像金额数字类的.可以用cxCurrencyEdit. 控件, 更好用.
