Browse Source

+ added the win16api keyboard functions

git-svn-id: trunk@31587 -
nickysn 10 years ago
parent
commit
09a4efe5d3
1 changed files with 10 additions and 0 deletions
  1. 10 0
      rtl/win16/winprocsh.inc

+ 10 - 0
rtl/win16/winprocsh.inc

@@ -278,3 +278,13 @@ function lstrcat(lpszString1: LPSTR; lpszString2: LPCSTR): LPSTR; external 'KERN
 function lstrlen(lpszString: LPCSTR): SmallInt; external 'KERNEL';
 
 function LoadString(hints: HINST; idResrouce: UINT; lpszBuffer: LPSTR; cbBuffer: SmallInt): SmallInt; external 'USER';
+
+{ Keyboard Driver Functions }
+
+function OemKeyScan(uOemChar: UINT): DWORD; external 'KEYBOARD';
+function VkKeyScan(uChar: UINT): UINT; external 'KEYBOARD';
+function GetKeyboardType(fnKeybInfo: SmallInt): SmallInt; external 'KEYBOARD';
+function MapVirtualKey(uKeyCode, fuMapType: UINT): UINT; external 'KEYBOARD';
+function GetKBCodePage: SmallInt; external 'KEYBOARD';
+function GetKeyNameText(lParam: LONG; lpszBuffer: LPSTR; cbMaxKey: SmallInt): SmallInt; external 'KEYBOARD';
+function ToAscii(wVirtKey, wScanCode: UINT; lpKeyState: LPBYTE; lpChar: LPDWORD; wFlags: UINT): SmallInt; external 'KEYBOARD';