用DELPHI5,测试一个字符串是否为数字的函数如何写？

Question

try
  StrToInt()
except
 ...不过我一般是
if (StrToIntDef(s, MaxInt) = MaxInt) then
 ...

Answer 1

我也是用的try
可是在f9 运行是总出现提示，请教如何能去掉这个提示？？？

Answer 2

直接运行文件时就不会出现了，在D的IDE环境下最好不要把它去掉。

Answer 3

function IsNumber(mStr: string): Boolean;
var
  I: Real; //I: Integer;//IsInteger()
  E: Integer;
begin
  Val(mStr, I, E);
  Result := E = 0;
end;