FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#8
|
|||
|
|||
Saludos
Puedes validar datos usando el evento OnKeyPress del Edit de la siguiente forma: procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char); begin if (key <#48) or (key >#57) then if key<>#8 then begin beep; showmessage('Solo puedes introducir números'); key:=#0; edit1.SetFocus; end; end; end. En la ayuda de Delphi busca Key codes y encontraras todas las teclas del teclado. Espero que te sea util |
|
|
|