como fazer p/ usar o pressionamento de duas teclas em Deplhi

Delphi

19/10/2003

Em Clipper eu posso simular o pressionamento de duas teclas simultaneas, como por exemplo:

tecla = Inkey(0)
if tecla = -39
? ´voce apertou: ALT + F10´
endif

No NG do clipper existe uma tabela de codigo de teclas, tais como exemplo:
SHIFT + F4 => 23 ou K_SH_F4,
ALT + O => 280 ou K_ALT_0,
etc.

em delphi eu só consigo uas as F1..F12 (VK_F1..VK_F12). O escape é VK_Escape.

Mais como simular em Deplhi o ALT + F10, como no exemplo clipper acima:

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;Shift: TShiftState);
begin
case key of ???????: showmessage(´Voce apertou ALT + F10´); end;
end;

Diante mao já agradeco as ajudas...


Adonis

Adonis

Curtidas 0

Respostas

Rafael Roni

Rafael Roni

19/10/2003

Tem um componente na
www.torry.net
chamado sendkey que faz isso para vc


GOSTEI 0
Adonis

Adonis

19/10/2003

agradeco as ajudas acima...


GOSTEI 0
POSTAR