//***********************头部定义变量
var
WM_Sock :Integer;//禁用键用到变量
hHandle :HWND;//禁用键用到变量
const
LLKHF_ALTDOWN = $20;//屏蔽热键用
//************************定义函数
//禁用左右win,ALT_TAB等组合键
function LowLevelKeyboardProc(vNode:Integer;wParam:WPARAM;lParam:LPARAM):LRESULT;stdcall;
type
KbDllHookStruct = record
vkCode:DWord;
ScanCode:DWord;
Flags:DWord;
Time:DWord;
dwExtraInfo:DWord;
end;
var
P:^KbDllHookStruct;
fEatKeystroke : boolean;
begin
Result := 0;
P := Pointer(LPARAM);
if vNode = HC_ACTION then
begin
case wParam of
WM_KEYDOWN,WM_SYSKEYDOWN,WM_KEYUP,WM_SYSKEYUP:
本内容试读结束,登录后可阅读更多
下载后可阅读完整内容,剩余2页未读,立即下载
- 1
- 2
前往页