比如'1234'这样一个字符串

解决方案 »

  1.   

    try
      strtoint('1234');
    except
      showmessage('不是整数');
    end;
      

  2.   

    var
      Str:String;
      I:Integer;
    begin
      Str:='1235';
      If TryStrToInt(Str,I) then
        ShowMessage('Str 是整数)
      Else
        ShowMessage('Str 不是整数);
      

  3.   

    function IsNumber(const strValue:string):Boolean;
    begin
      Result:=True;
      try
        StrToInt64(strValue);
      except
        Result:=False;
      end;
    end;
      

  4.   

    调用上边这个函数就可以了我以前几乎翻遍了delphi所有的单元文件,楞没找到,不知道是delphi弱还是我弱
      

  5.   

    star_of_light(星星之光)的方法也可以