判断是否是数字

     阅读 1106 次    更新时间:2014/9/24    
如何判断文本框或变量中的字符是否为合法数字,可以用下面这个方法:
var
  i: LongInt;
  f: Double;
begin
  if TryStrToInt(Edit1.Text,i) or TryStrToFloat(Edit1.Text, f) then
    ShowMessage('是数字')
  else
    ShowMessage('不是数字');
end;
 
 

Copyright 2003-2008 All Rights Reserved 自由风工作室 版权没有 [湘ICP备06002185号]
.