Cita:
Empezado por Master23
Quiero saber cómo usar las teclas f12 etc y las flechas del teclado porque no me sale gracias.agradezco su ayuda de antemano.
|
Aunque no das muchos datos de cómo quieres capturar dichas teclas, te pongo un ejemplo simple; coloca el siguiente código en el evento
OnKeyDown del formulario:
Código Delphi
[-]procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
case Key of
VK_F12 :ShowMessage('Has presionado la tecla F12');
VK_UP :ShowMessage('Has presionado la tecla Flecha Arriba');
VK_DOWN :ShowMessage('Has presionado la tecla Flecha Abajo');
VK_LEFT :ShowMessage('Has presionado la tecla Flecha Izquierda');
VK_RIGHT :ShowMessage('Has presionado la tecla Flecha Derecha');
end;
end;
.
Para que te funcione correctamente(en el caso de tener muchos controles en el formulario) debes poner la propiedad
KeyPreview=True del formulario.
Saludos...
__________________
"Pedid, y se os dará; buscad, y hallaréis; llamad, y se os abrirá." Mt.7:7