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

Giniromero · #1 24-09-2003

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 · #2 24-09-2003

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 · #3 24-09-2003

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.

Virginia

judoboy · #4 24-09-2003

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 · #5 24-09-2003

Gracias,

les echaré un vistazo.

Virginia

Alfredo Soler · #6 24-09-2003

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 · #7 24-09-2003

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 · #8 24-09-2003

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 · #9 24-09-2003

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

http://www.clubdelphi.com/foros/show...light=instalar

Giniromero · #10 25-09-2003

Gracias,

lo echaré un vistazo.

Saludos

Virginia