Ver Mensaje Individual
  #1  
Antiguo 24-11-2005
onlytk onlytk is offline
Miembro
 
Registrado: oct 2005
Posts: 53
Reputación: 19
onlytk Va por buen camino
Habilitar la tecla Delete en ingreso de Numeros en un TEDIT

Hola amigos, tengo el siguiente problema, quiero que en un TEdit solo se pueda ingresar números enteros, y que permita que se borre con las teclas backspace y delete, hice lo siguiente en el evento OnKeyPress.

Código Delphi [-]
if  Not (Key IN ['0'..'9',#8,'.']) then
  Key := #0;

El único problema es, que no se que como permitir que se borre cuando se presione la tecla delete, el hexadecimal #8 es el Backspace en ASCII, tambien encontre que el #22 representa el Pegar (Ctrl + V) y #3 el Copiar (Ctrl + V), pero no encontre cual representa el caracter enviado al presionar la tecla DELETE, .......... además donde puedo encontrar la lista completa de estos codigos ascii? que recive el evento OnKeyPress??

Salu2.
Responder Con Cita