Fórum Disparar procedimento ao pressionar Ctrl N no form #310103
20/01/2006
0
como faço para que ao seja pressionada as teclas Ctrl + N um procedimento seja disparado?
Raserafim
Curtir tópico
+ 0
Responder
Posts
20/01/2006
Vinicius2k
Colega,
Ajuste a propriedade [b:24837d6e86]KeyPreview[/b:24837d6e86] do Form para [b:24837d6e86]True[/b:24837d6e86] e trabalhe o evento OnKeyDown do Form:
Onde 78 é o código da tecla ´N´.
Dica: quando não souber o código de uma tecla, utilize neste evento algo como:
T+
Ajuste a propriedade [b:24837d6e86]KeyPreview[/b:24837d6e86] do Form para [b:24837d6e86]True[/b:24837d6e86] e trabalhe o evento OnKeyDown do Form:
procedure SeuForm.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if (Shift = [ssCtrl]) and (Key = 78) then
ShowMessage(´Você pressionou CTRL + N´);
end;Onde 78 é o código da tecla ´N´.
Dica: quando não souber o código de uma tecla, utilize neste evento algo como:
ShowMessage(IntToStr(Key));
T+
Responder
Gostei + 0
26/01/2006
Raserafim
já setei o KeyPreview para true mas não deu certo
Responder
Gostei + 0
26/01/2006
Aroldo Zanela
Colega,
Reveja seu código e em qual manipulador de evento está inserido o código postado pelo 2k, pois está correto.
Reveja seu código e em qual manipulador de evento está inserido o código postado pelo 2k, pois está correto.
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)