Key.Control (gb.qt4)
Static Property Read Control As Boolean
Retorna se a tecla "CONTROL" éstá pressionada.
Isto é dentro dos eventos ..._KeyPress ou ..._keyrelease.
As chaves podem ter funções que lhes são atribuídas pelo sistema operacional ou outros programas; você pode fechar/... seus programas do sistema/outros programas.
Exemplos
' É necessário criar o Button1; com o foco sobre ele (Use a tecla Tab).
' Pode cortar e colar este exemplo.
PUBLIC SUB Button1_KeyPress()
IF Key.Control THEN
Button1.Text = " True " & CString(Time)
ELSE
Button1.Text = " False " & CString(Time)
ENDIF
END
PUBLIC SUB Form_KeyPress()
' O evento KeyPress com chave Control, muitas vezes, passa para o evento Form.
DIM CntrlDown AS Boolean
TRY CntrlDown = Key.Control
CntrlDown = IIf( ERROR , FALSE, CntrlDown)
IF CntrlDown THEN
ME.Text = CString(Time) & " True: chave Control está sendo pressionada"
ELSE
ME.Text = CString(Time) & " True: chave Control não está sendo pressionada"
ENDIF
END
Veja também