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
   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 }
 const
   kbdF1        = $FF01;