un tEdit que sólo tome datos de tipo integer?

[Giniromero]

Hola,

Necesito saber si hay alguna propiedad del Tedit, que me permita obligarle a que sólo tome datos integer, o numéricos.

O si hay alguna manera que, mediante código, pueda filtrar, para que, sólo si son numéricos los datos que tiene ese objeto, tome el valor que en él se encuentra para manipularlo, y sinó, muestre un mensaje de error.

Algo así como:

If (valor del TEdit es integer) then begin
accion1
end
else begin
showmessage ('Tienes que introducir valores numéricos');
end;

Lo que necesitaría es la expresión (valor del TEdit es integer).

Muchas gracias

Virginia