[dec]

Hola,

Código Delphi [-]
var
  dummy: integer;
begin
  if TryStrToInt(Edit1.Text, dummy) then
  begin
    // Edit1.Text contiene un número entero, está en "dummy"
  end
  else
  begin
    // Edit1.Text no contiene un número entero "válido".
  end;
end;