Foros Club Delphi - caracteres numéricos en un edit

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

- Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)

- - caracteres numéricos en un edit (https://www.clubdelphi.com/foros/showthread.php?t=30872)

edusus

21-04-2006 01:15:11

caracteres numéricos en un edit

Hola amigos, quiero que un edit (NO un maskedit) solo acepte caracteres numéricos. ¿Cómo puedo hacerlo?
Gracias por adelantado.

samantha jones

21-04-2006 01:24:16

En el Evento OnKeyPress del edit

Código Delphi [-]if not(key in ['0'..'9', '.', ',', #8, #9]) then
    key:=#0;

y la propiedad keypreview de la forma = true

Saludos

La franja horaria es GMT +2. Ahora son las 02:29:10.