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

[__cadetill]

Puedes utilizar el TCurrencyEdit de las RX. A parte de no permitir la entrada de letras y poder dar formato a los números, tienes la propiedad AsInteger

[Giniromero]

Hola cadetill,

no he encontrado, entre mi lista de componentes, el que me aconsejas.
¿que tipo de componentes son los RX?

De todos modos se me ha ocurrido otra forma de solucionar mi problema, sin tener que mirar el tipo de datos del TEdit.

La soluión no tiene nada que ver con lo planteado aquí, por lo que no os voy a aburrir con mi aplicación, pero en cualquier caso, muchas gracias por el interes, y como siempre, por la ayuda.

;) :) :D

Virginia

[judoboy]

Los RXLibs forman parte de un paquete de componentes que te recomiendo, y encima son gratuitos.
Desde la propia página de cadetill te los puedes descargar.

[Giniromero]

Gracias,

les echaré un vistazo.

Virginia

[Alfredo Soler]

En el Evento KeyPress pones un filtro para que solo se puedean digitar los valores deseados.

Aqui va un ejemplo

procedure Edit2KeyPress(Sender: TObject; var Key: Char);
begin
if not (key in ['0'..'9',#8]) then key:=#0;
end;

En el ejemplo solo te permite los caracteres del 0 al 9 el el #8 que es el retroceso.

[delphi.com.ar]

El ejemplo de Alfredo fallará si al usuario se le ocurre pegar un string que tenga en el portapapeles. Si te interesa, te puedes dar una vuelta por mi página, donde hay un paquete de componentes que contiene un TIntEdit que es un editor de enteros y TCardinalEdit, que es un editor para cardinal.

Saludos!

[Giniromero]

Hola,

¿Como hago para instalar estos nuevos componentes? por que no he tenido que hacerlo nunca, y estoy segura que me podrían ser muy utiles... si supiera como instalarlos:(


Muchas gracias, de antemano,

Virginia

[__cadetill]

mirate este hilo a ver si te ayuda con la instalación de los componentes

http://www.clubdelphi.com/foros/showthread.php?s=&threadid=2661&highlight=instalar

[Giniromero]

Gracias,

lo echaré un vistazo.

Saludos

Virginia