字符串转化的一个小问题

Question

您好:
    我要把一个字符串转化为整数,使用strToInt,但是要检测输入的字符串是否能够转化为整数,如果含有字母的字符串传入StrToInt,该函数就抛出异常.
请问如何能够检测一个字符串是否能够转化为整数,谢谢!

Answer 1

try
StrToInt('32ue3');
except
 showMessage('Error!');
end;

Answer 2

procedure TForm1.Button1Click(Sender: TObject);
var
 i,j:integer;
begin
if trystrtoint('sss765',i) then
    j:=i
 else
  showmessage('非法的字符转化');
end;trystrtoint是delphi自带的函数

Answer 3

procedure TfrmMain.Button1Click(Sender: TObject);
var
  i: Integer;
  Str: string;
begin
  Str := Trim(Edit1.Text);
  for i := 1 to Length(Str) do
  if not (Str[i] in ['0'..'9']) then begin
    ShowMessage('False');
    Exit;
  end;
end;