编程论坛
注册
登录
编程论坛
→
Delphi论坛
[求助]判断输入是否为数字
冰凝1984
发布于 2006-07-14 16:49, 916 次点击
我试图用以下语句判断输入edit4中的内容是否为数字(在一本书上看到的),但总是没有成功,不知道为什么。
try
numOut:=strtoint(edit4.Text);
except
showmessage('请正确输入数量!');
exit;
end;
只有本站会员才能查看附件,请
登录
3 回复
#2
冰凝1984
2006-07-14 20:45
请问还有没有其它方法可以实现这个功能
#3
ysp_1984
2006-07-15 17:15
在edit1的keypress事件中输入下面的代码:
if not key in['0'..'9'] then
key:=#0;
#4
冰凝1984
2006-07-16 21:17
高
1