Browse Source

* second part of patch by James Richters from bug #32558 - changes in RemapScanCodes in order to comply to the respective Windows API definitions

git-svn-id: trunk@37674 -
Tomas Hajny 7 years ago
parent
commit
9002d22168
1 changed files with 1 additions and 1 deletions
  1. 1 1
      packages/rtl-console/src/win/crt.pp

+ 1 - 1
packages/rtl-console/src/win/crt.pp

@@ -296,7 +296,7 @@ var
    DoingNumChars: Boolean;
    DoingNumChars: Boolean;
    DoingNumCode: Byte;
    DoingNumCode: Byte;
 
 
-Function RemapScanCode (ScanCode: byte; CtrlKeyState: byte; keycode:longint): byte;
+Function RemapScanCode (ScanCode: word; CtrlKeyState: dword; keycode:word): byte;
   { Several remappings of scancodes are necessary to comply with what
   { Several remappings of scancodes are necessary to comply with what
     we get with MSDOS. Special Windows keys, as Alt-Tab, Ctrl-Esc etc.
     we get with MSDOS. Special Windows keys, as Alt-Tab, Ctrl-Esc etc.
     are excluded }
     are excluded }