一个关于判断的问题

Question

各位大师帮帮忙:
怎样判断一个文本框的内容不是数字.

Answer 1

没有专门的判断函数function IsNumber(const strValue:string):Boolean;
begin
  Result:=True;
  try
    StrToInt64(strValue);
  except
    Result:=False;
  end;
end;或者：
function IsNumber(const strValue:string):Boolean;
var
  i,E: Integer;
begin
  Result:=True;
  Val(strValue,i,E);
  if e<>0 then Result:=False;
end;