Explorar o código

* 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 %!s(int64=8) %!d(string=hai) anos
pai
achega
9002d22168
Modificáronse 1 ficheiros con 1 adicións e 1 borrados
  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;
    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
     we get with MSDOS. Special Windows keys, as Alt-Tab, Ctrl-Esc etc.
     are excluded }