![]() |
![]() |
| Paypal | FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
|||||||
| Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
|
Herramientas | Buscar en Tema | Desplegado |
|
#6
|
|||
|
|||
|
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. |
|
|
|