Evento KeyDown no Delphi

Delphi

08/05/2006

Preciso que no evento KeyDown no Edit, verifique se precionei
Alt+G
Preciso ver se foi essas duas teclas juntas ...

Qndo preciono o Alt já chama o evento ...

Tenho outros testes de teclas no KeyDown, preciso incluir esse teste ...

[ ]´s
Bruno Figueira :( :cry:


Bfbraz

Bfbraz

Curtidas 0

Respostas

Glecio

Glecio

08/05/2006

Caro amigo, acho q é assim:

If (ssAlt In Shift) And (Key = 71) Then
...

Se não conseguir, poste aqui, porque estou sem o Dephi agora pra testar. . .


GOSTEI 0
Marcelo_mileris

Marcelo_mileris

08/05/2006

É só utilizar no evento OnKeyDown o seguinte código:

if (Shift = [ssAlt]) and (Key = 71) then ShowMessage(´ALT+G´);


Lembrando que o ´71´ corresponde ao G maiúsculo


GOSTEI 0
Tiago Rizzon

Tiago Rizzon

08/05/2006

71 = G e 103 = g


GOSTEI 0
POSTAR