在文本框中输入的数据如何判断是它否为数字

Question

我在文本框中输入的数据如何让DELPHI来判断是它否为数字或者是字符啊

Answer 1

在文本框的ONKEYPRESS事件中写：  if ((key < '0') or (key > '9')) and (key <> #8) then
  begin
    abort;
  end;

Answer 2

if ((key < '0') or (key > '9')) and (key <> #8) then
  begin
    Key=#0;
  end;

Answer 3

try
  strtoint(edit1.text);
  showmessage('OK');
  exit;
except
  showmessage('Error');
end;