Tema: caracteres numéricos en un edit
Ver Mensaje Individual
  #2  
Antiguo 21-04-2006
samantha jones samantha jones is offline
Miembro
  
Registrado: ago 2004
Posts: 46
Reputación: 0
samantha jones Va por buen camino
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
Responder Con Cita