![]() |
![]() |
| Paypal | FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
|||||||
| Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Buscar | Temas de Hoy | Marcar Foros Como Leídos |
|
|
Herramientas | Buscar en Tema | Desplegado |
|
#3
|
||||
|
||||
|
Tenes que tener el formulario que abris KEYPREVIEW en TRUE
y colocar procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); begin if Key=27 then Close;// es la tecla Esc end; Espero que te sirva ![]() |
| Herramientas | Buscar en Tema |
| Desplegado | |
|
|
|