Ver Mensaje Individual
  #1  
Antiguo 10-06-2008
madiazg madiazg is offline
Miembro
 
Registrado: sep 2005
Ubicación: Canarias
Posts: 120
Reputación: 19
madiazg Va por buen camino
KeyDow y captura del teclado

Hola a todos,
utilizo el evento Keydown de un Form para mover una imagen por el form a través de pulsar las teclas de cursor. El problema viene porque, si pulso otro componente del form, en este caso un checkbox, el form deja de capturar las teclas y la imagen no se mueve.
¿Cómo puedo hacer para que, aunque pulse sobre otro componente del form, el form siga capturando las teclas?
El código que utilizo en el evento keydown del form es

Código:
procedure TFormImagenes.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if Obtener2Imagenes then
    case key of
      VK_LEFT: FormPrincipal.Action46.Execute;
      VK_RIGHT: FormPrincipal.Action45.Execute;
  end;
end;
Saludos...
Responder Con Cita