![]() |
![]() |
| 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 |
|
|
|
#1
|
||||
|
||||
|
Si es para aplicar en un formulario como es lógico, pon la propiedad del formulario KeyPreview a True.
y luego algo como esto: Código:
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if key = Vk_F1 then
ShowMessage('Pulsó F1');
end;
|
![]() |
| Herramientas | Buscar en Tema |
| Desplegado | |
|
|
|