Fórum 2 Teclas Pressionadas #210446
30/01/2004
0
Olá Amigos, Vou Ser Direto
Como eu Faço Para executar uma função quando apertar 2 teclas ao mesmo tempo exemplo:
Shift + Ceta para esquerda
Atenciosamente Djonatas Tenfen
:shock: :shock: :shock:
Como eu Faço Para executar uma função quando apertar 2 teclas ao mesmo tempo exemplo:
Shift + Ceta para esquerda
Atenciosamente Djonatas Tenfen
:shock: :shock: :shock:
Djonatas
Curtir tópico
+ 0
Responder
Posts
30/01/2004
Wolverine
se for no menu use o propriedade ShortCut
Responder
Gostei + 0
31/01/2004
Carlosrm
Djonatas,
(No evento OnKeyDown do form - pressionanando ShiftState (ssShift, ssCtrl, ssAlt...) e uma tecla válida ao mesmo tempo:
If (Shift = [ssShift]) and (key = 37) then
showmessage(´Pressionei Shift e Seta à Esquerda simultaneamente!´);
No lugar de showmessage vc coloca a chamada à sua função.
carlosrm.
(No evento OnKeyDown do form - pressionanando ShiftState (ssShift, ssCtrl, ssAlt...) e uma tecla válida ao mesmo tempo:
If (Shift = [ssShift]) and (key = 37) then
showmessage(´Pressionei Shift e Seta à Esquerda simultaneamente!´);
No lugar de showmessage vc coloca a chamada à sua função.
carlosrm.
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)