Key.Control (gb.qt4)

Static Property Read Control As Boolean

Restituisce se si preme il tasto CONTROL.

Questo è interno all'evento ..._KeyPress o ..._KeyRelease.
Ai tasti possono essere assegnate funzioni dal sistema operativo o da altri programmi; potresti chiudere/... il tuo programma/altri programmi/il sistema.

Esempi

' Serve un Button1; con il focus su di esso (Usa il tasto Tab).
' puoi copiare e incollare questo esempio.

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()
' L'evento KeyPress con Control Key passa spesso per questo evento Form.
  DIM CntrlDown AS Boolean
  TRY CntrlDown = Key.Control
  CntrlDown = IIf( ERROR , FALSE, CntrlDown)
  IF CntrlDown THEN
    ME.Text = CString(Time) & " True: il tasto Control viene tenuto premuto"
  ELSE
    ME.Text = CString(Time) & " False: Il tasto Control non è stato premuto"
  ENDIF
END

' Control e tasto A insieme
PUBLIC SUB Form_KeyPress()
  If Key.Code = Key["a"] And If Key.Control Then
    Message("Ctrl+A premuti")
  Endif
END

Vedi anche