Array
(
)

Valor da Tecla

Felipeiw
   - 29 dez 2005

Preciso abrir um painel no form com a combinação de algumas teclas, por exemplo CTRL+ALT+D, qual seria o codigo desta combinação isso é possivel?
Abs


Andremuller
   - 29 dez 2005

não dá pra criar uma action no TActionList ?


Martins
   - 29 dez 2005

Tente fazer assim, pode ser q tenha outro metodo, mas esse tb funciona.

#Código


procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if (ssAlt in Shift) and (ssCtrl in Shift) and (chr(Key) in [´D´, ´d´]) then
begin
ShowMessage(´Alt + Ctrl + D´);
...
end;
end;


Depois vc posta se deu certo com vc!!!

Boa sorte!!!


Michael
   - 29 dez 2005

[url=http://delphi.about.com/cs/adptips2000/a/bltip0400_3.htm]Este link[/url] tbm é interessante...

[]´s


Martins
   - 29 dez 2005


Citação:
[url=http://delphi.about.com/cs/adptips2000/a/bltip0400_3.htm]Este link[/url] tbm é interessante...

[]´s


Boa Michael, sempre prestativo, o link mostra uma dica q indica o estado de uma tecla, ou seja, se ela está pressionada ou não.

Valew!!!!


Felipeiw
   - 29 dez 2005

Caro Martins e Michael mt obrigado funcionaram perfeitamente.