Valor da Tecla

Delphi

29/12/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


Felipeiw

Felipeiw

Curtidas 0

Respostas

Andremuller

Andremuller

29/12/2005

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


GOSTEI 0
Martins

Martins

29/12/2005

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

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!!!


GOSTEI 0
Michael

Michael

29/12/2005

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

[]´s


GOSTEI 0
Martins

Martins

29/12/2005

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


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

Valew!!!!


GOSTEI 0
Felipeiw

Felipeiw

29/12/2005

Caro Martins e Michael mt obrigado funcionaram perfeitamente.


GOSTEI 0
POSTAR