Detectar Shortcut (Ctrl + Tab)
 

hola, buenas tardes, espero me puedan ayudar ...
en mi aplicacion quisiera ejecutar un proceso cuando el usuario presione Ctrl+Tab.

Ya busque en el ActionList pero no trae esta combinacion y necesito que sea asi, hay alguna forma de hacerlo ??

Tambien lo intente poner en el evento onKeyPress pero no se que es lo q me retornaria la variable key en caso de ser una combinacion :confused:

Hola Iganacio, coloca este codigo en el evento OnKeyDown de tu formulario y pon a True la propiedad KeyPreview de tu formulario.

Código Delphi [-]
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
 if (ssCtrl in Shift) and (Key=VK_TAB) then
  Showmessage('Se ha presionado las teclas Ctrl+Tab');
end;

Saluditos

Resuelto
 

gracias caro,
jeje lo acababa de resolver hace poco mas de una hora pero se agradece la ayuda, solo q lo puse en el onKeyUp ya que no lo hacia en el onKeyDown, posiblemente sea porq el evento onKeyDown se ejecuta repetidamente mientras tengas presionada la tecla Ctrl o cualquier tecla, pero en fin, ya me funciono, gracias :).

Este es el codigo que utilice:

Código Delphi [-]
procedure Tf_categorias.FormKeyUp(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if (key = VK_TAB) and (Shift = [ssCtrl]) then
    // Sentencia;
end;