1号店抵用券免费领:delphi求助

来源:百度文库 编辑:查人人中国名人网 时间:2024/04/29 18:27:12
我的一个学号EDIT我想在EDIT里面输入数字...如果不是数字就提示非法字符..我在输入字符比如a的时候他就显示非法字符..但是在EDIT里面就有一个a了..那个a他就不会被删掉...我在写程序的时候用了EDIT.text:=''清空了的嘛..怎么回事啊...

输入时过滤字符可以在OnKeyPress事件中添加代码实现,比如
begin
if not (Key in ['0'..'9', #13, #8]) then Key := #0;
end;
这样就只能输入0-9和删除、回车了