Question

delphi 7，在edit中复制粘贴的内容，怎么判别是不是数字，如果不是数字给予提示，请问怎么实现！

像这样，就应该提示请输入数字！

Answer 1

keypress事件 看下参数 然后用 FOR KEY NOT IN [..] 不是数字或者回车空格 点之类的 就 showmessage bit按钮？ 看这个名字我想到了CNPACK

Answer 2

try
strtoint(edit1.text)
except
showmessage('input number');
edit1.SetFocus ;
end;