Browse Source

+ introduced TEnhancedShiftStateElement - an enum type, containing the elements of TEnhancedShiftState set

git-svn-id: branches/unicodekvm@40328 -
nickysn 6 years ago
parent
commit
5648bd9bdc
1 changed files with 2 additions and 1 deletions
  1. 2 1
      packages/rtl-console/src/inc/keybrdh.inc

+ 2 - 1
packages/rtl-console/src/inc/keybrdh.inc

@@ -54,7 +54,7 @@ type
   dependent. System dependent constants may be defined to cover those, with
   dependent. System dependent constants may be defined to cover those, with
   possibily having the same name (but different value). }
   possibily having the same name (but different value). }
 
 
-  TEnhancedShiftState = set of (
+  TEnhancedShiftStateElement = (
     essShift,
     essShift,
     essLeftShift,
     essLeftShift,
     essRightShift,
     essRightShift,
@@ -71,6 +71,7 @@ type
     essScrollLockPressed,
     essScrollLockPressed,
     essScrollLockOn
     essScrollLockOn
   );
   );
+  TEnhancedShiftState = set of TEnhancedShiftStateElement;
 
 
   TEnhancedKeyEvent = record
   TEnhancedKeyEvent = record
     VirtualKeyCode: Word;    { device-independent identifier of the key }
     VirtualKeyCode: Word;    { device-independent identifier of the key }