|
@@ -54,6 +54,21 @@ type
|
|
|
dependent. System dependent constants may be defined to cover those, with
|
|
|
possibily having the same name (but different value). }
|
|
|
|
|
|
+ TEnhancedShiftState = set of (
|
|
|
+ essLeftShift,
|
|
|
+ essRightShift,
|
|
|
+ essLeftCtrl,
|
|
|
+ essRightCtrl,
|
|
|
+ essLeftAlt,
|
|
|
+ essRightAlt,
|
|
|
+ essCapsLockPressed,
|
|
|
+ essCapsLockOn,
|
|
|
+ essNumLockPressed,
|
|
|
+ essNumLockOn,
|
|
|
+ essScrollLockPressed,
|
|
|
+ essScrollLockOn
|
|
|
+ );
|
|
|
+
|
|
|
TEnhancedKeyEvent = record
|
|
|
VirtualKeyCode: Word; { device-independent identifier of the key }
|
|
|
VirtualScanCode: Word; { device-dependent value, generated by the keyboard }
|