Foros Club Delphi - Validación de Datos Numéricos

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- Conexión con bases de datos (https://www.clubdelphi.com/foros/forumdisplay.php?f=2)

- - Validación de Datos Numéricos (https://www.clubdelphi.com/foros/showthread.php?t=1907)

TelloClos

02-07-2003 18:33:42

Validación de Datos Numéricos

Hola!

como podria validar al leer el contendio de una caja de texto que este solo este compuesto de números, antes de utilizar esta información.
- por ejemplo si este fuera un rut ded cliente el cual lo voy a entregar de parametro a un porcedimiento almacenado, si este texto lleva entre medio una letra el sistema me lanza una excepción que procova obviamente la caida de mi aplicación.

en visual basic existe una función que es ISnumeric(texto) que me válida esta situación, pero en delphi desconosco la existencia de alguna función similar, esta por lo menos no la reconoce.

de ante mano muchas gracias!

Gisela

02-07-2003 21:18:31

Hola.
¿No te sirve usar el MaskEdit para ingresar los datos? Si hacés clic derecho en el objeto y elegís la opción "Input Mask Editor", podés determinar cuales serán los caracteres admitidos.

Saludos

Gisela

marcoszorrilla

02-07-2003 22:23:26

Pon este código en el evento OnKeyPress de tu TEdit y sólo admitirá números:

Código:

 

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);

          begin

            if ( StrScan('0123456789.-',Key) <> nil ) or

               ( Key = Char(VK_BACK) ) then { BackSpace Key }

            begin

              {Aqui tu tratamiento normal del evento}



            end

            else

              Key := #0;

          end;

Un Saludo.

TelloClos

02-07-2003 23:27:33

Muchas gracias por la ayuda!!

estuve viendo las 2 alternativas
para el caso, me sirvio mas la segunda ya que es: buena,bonita y barata

trianazac

05-12-2007 03:40:44

GRacias

:)Muchas gracias por esta informaciòn ya que a mi tambien me fue de mucha utilidad el aver encotnrado estas formas de evitar introducir letras en campos numèricos.

muchas gracias.:D

La franja horaria es GMT +2. Ahora son las 03:26:09.