关于键盘钩子的问题，请教大家

最新推荐文章于 2021-05-18 06:41:43 发布

转载最新推荐文章于 2021-05-18 06:41:43 发布 · 80 阅读

本文探讨了使用Delphi和Windows SDK实现全局键盘钩子的方法。重点在于如何在不同操作系统如Windows XP和Windows 98中正确配置和使用低级别鼠标钩子。文章通过具体的代码示例展示了设置钩子的过程，并提出了在Windows 98下钩子失效的问题。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

关于键盘钩子的问题，请教大家 Delphi / Windows SDK/API
http://www.delphi2007.net/DelphiAPI/html/delphi_20061122084602187.html
function StartHookMouse:boolean;
const
WH_MOUSE_LL = 14;
begin
if hhkLowLevelMouse = 0 then hhkLowLevelMouse := SetWindowsHookEx(WH_MOUSE_LL, LowlevelMouseProc, HInstance, 0);
//if hhkLowLevelMouse = 0 then hhkLowLevelMouse := SetWindowsHook(WH_MOUSE_LL, @LowlevelMouseProc);
result := (hhkLowLevelMouse <> 0) ;
end;

这段放在自己的程序里面，没有放在dll里面，在xp里面可以做到全局钩子，但是在
98中钩子无效，何解？？？？
请问高手

kernel32.dll?

function StartHookMouse:boolean;
begin
if hhkLowLevelMouse = 0 then hhkLowLevelMouse := SetWindowsHookEx(WH_MOUSE_LL, LowlevelMouseProc, HInstance, 0);
result := (hhkLowLevelMouse <> 0) ;
end;

const
WH_KEYBOARD_LL = 13;
WH_MOUSE_LL = 14;

98中钩子无效！

关注博主即可阅读全文