var KHK: HHook; function HookProc(ICode: integer;WP:WParam;LP:LParam):LResult; begin Result:=CallNextHookEx(KHK,0,0,0); end;使用下列语句可以锁定: KHK:=SetWindowsHookex(WH_JOURNALPLAYBACK,@HookProc,HInstance,0); 使用下列语句结束锁定: UnHookWindowsHookEx(KHK); 不知对不对?它会不会影响我的程序的键盘事件的正常工作?
我已经实现了,如何让keybd_event可以发,而用户不能进行键盘操作呢?
u can use keybd_event in your hook HookProc function
function HookProc(ICode: integer;WP:WParam;LP:LParam):LResult;
begin
Result:=CallNextHookEx(KHK,0,0,0);
end;使用下列语句可以锁定:
KHK:=SetWindowsHookex(WH_JOURNALPLAYBACK,@HookProc,HInstance,0);
使用下列语句结束锁定:
UnHookWindowsHookEx(KHK);
不知对不对?它会不会影响我的程序的键盘事件的正常工作?