Browse Source

+ introduced the TEnhancedKeyEvent record

git-svn-id: branches/unicodekvm@40078 -
nickysn 6 years ago
parent
commit
cee3065f93
1 changed files with 8 additions and 0 deletions
  1. 8 0
      packages/rtl-console/src/inc/keybrdh.inc

+ 8 - 0
packages/rtl-console/src/inc/keybrdh.inc

@@ -54,6 +54,14 @@ 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). }
 
 
+  TEnhancedKeyEvent = record
+    VirtualKeyCode: Word;    { device-independent identifier of the key }
+    VirtualScanCode: Word;   { device-dependent value, generated by the keyboard }
+    UnicodeChar: WideChar;   { the translated Unicode character }
+    AsciiChar: Char;         { the translated ASCII character }
+    ShiftState, Flags: Byte;
+  end;
+
 { System independent function key codes }
 { System independent function key codes }
 const
 const
   kbdF1        = $FF01;
   kbdF1        = $FF01;