如何判断一个Edit中输入的是不是整数

Question

如何判断一个Edit中输入的是不是整数

Answer 1

function TryStrToInt(const S: string, out Value: Integer): Boolean;

Answer 2

try
  strtoint(edit1.text);
  showmessage('Get a integer!');
except
  showmessage('the text of edit is not a integer!')
end;

Answer 3

呵呵，又跟老大学到东西咯！
从D6开始支持，D5不支持！procedure TForm1.Button1Click(Sender: TObject);
var
  i: Integer;
begin
  if TryStrToInt(Edit1.Text, i) then
    ShowMessage('您输入的是数字');
end;