Yo uso un try. Declaro una variable entera y hago esto:
var
a:integer;
begin
try
a:=StrToInt(txtNumero.Text);
except
showmessage("El campo debe ser numérico");
end;
end;
__________________
Me llamo Ińigo Montoya. Tú mataste a mi padre. Prepárate a morir
Mi foro: http://gandalfmithrandir.foro.st
|