如何判断delphi文本框输入的是数字
Posted
tags:
篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了如何判断delphi文本框输入的是数字相关的知识,希望对你有一定的参考价值。
如何判断delphi文本框输入的是数字,或者说怎么能让文本框只允许输入数字
tryStrToInt('abc');
ShowMessage('正常');
except
ShowMessage('异常,不是数字');
Exit;
end; 参考技术A procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
var
a:integer;
begin
if not (key in ['0'..'9',#8]) then
begin
a:=Application.MessageBox('请输入数字','提示信息',MB_ok);
if a=6 then
begin
end
else
begin
end;
key:=#0;
end
else
begin
end;
end;
以上是关于如何判断delphi文本框输入的是数字的主要内容,如果未能解决你的问题,请参考以下文章