Key.Control
(gb.qt4)
Static Property Read Control As Boolean
Испитува дали е притиснат тастерот
CONTROL.
 |
Ова е во настаните ..._KeyPress или ..._KeyRelease.
|
 |
Тастерите може да имаат функција која им е придружена од оперативниот систем или некои други програми; може да ви се случи да го прекинете вашиот програм//некој друг програм/да го спуштите системот.
|
Example
' Potrebno e kopce Button1 koe e vo fokus ( koristete go tasterot Tab).
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()
' KeyPress nastan so Control tasterot cesto ce pomine niz ovoj Form nastan.
DIM altSet AS Boolean
TRY altSet = Key.Control
altSet = IIf( ERROR , FALSE, altSet)
IF altSet THEN
ME.Text = CString(Time) & " True: Pritisnat e tasterot Control"
ELSE
ME.Text = CString(Time) & " False: Ne e pritisnat e tasterot Control"
ENDIF
END
Previous Next Edit Rename Undo Refresh Search Administration
