100分求真正能屏敝掉win+d组合键的实例。(100分)

在网上找了不少相关的资料，但都无法真正实现。如果哪位高手能给我发个实例的话，这100分就归他了！不胜感谢！！！<br><br><br><br>邮箱：essenco888@163.com

给你发了一个DEMO，你看看吧

app2001，老大<br>给我来来一个，OK？

我发给你的源代码，绝对有效！看看吧！

用HOOK<br><br>unit HookUnit;<br><br>interface<br><br>uses<br>&nbsp; &nbsp;Windows, Messages;<br>var<br>&nbsp; &nbsp;hNextHookProc: HHook;//保存SetWindowsHookEx的返回值<br>&nbsp; &nbsp;procSaveExit: Pointer;<br>&nbsp; &nbsp;function KeyboardHookHandler(nCode: Integer; w_Param: WPARAM;<br>&nbsp; &nbsp; &nbsp; l_Param: LPARAM): LRESULT; stdcall;export;<br>&nbsp; &nbsp;function EnableHotKeyHook: BOOL; export;//安装钩子<br>&nbsp; &nbsp;function DisableHotKeyHook: BOOL; export;//卸载钩子<br>&nbsp; &nbsp;procedure HotKeyHookExit; far;<br><br>implementation<br><br>type<br>&nbsp; // Declaration from VC++ WINUSER.H<br>&nbsp; //<br>&nbsp; &nbsp;PKBDLLHOOKSTRUCT = ^KBDLLHOOKSTRUCT;<br>&nbsp; &nbsp;KBDLLHOOKSTRUCT = record<br>&nbsp; &nbsp; &nbsp; vkCode: DWORD;<br>&nbsp; &nbsp; &nbsp; scanCode: DWORD;<br>&nbsp; &nbsp; &nbsp; flags: DWORD;<br>&nbsp; &nbsp; &nbsp; time: DWORD;<br>&nbsp; &nbsp; &nbsp; dwExtraInfo: DWORD;<br>&nbsp; &nbsp;end;<br><br>const<br>&nbsp; &nbsp;LLKHF_ALTDOWN &nbsp;= KF_ALTDOWN shr 8;<br>&nbsp; &nbsp;WH_KEYBOARD_LL = 13;<br><br>function KeyboardHookHandler(nCode: Integer; w_Param: WPARAM;<br>&nbsp; l_Param: LPARAM): LRESULT; stdcall;<br>var<br>&nbsp; &nbsp;blEatKeystroke: Boolean;<br>&nbsp; &nbsp;p: PKBDLLHOOKSTRUCT;<br>begin<br>&nbsp; &nbsp;blEatKeystroke := False;<br>&nbsp; &nbsp;if nCode = HC_ACTION then<br>&nbsp; &nbsp;begin<br>&nbsp; &nbsp; &nbsp; case w_Param of<br>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp;WM_KEYDOWN,<br>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp;WM_SYSKEYDOWN,<br>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp;WM_KEYUP,<br>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp;WM_SYSKEYUP:<br>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp;begin<br>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; p := PKBDLLHOOKSTRUCT(l_Param);<br>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; // 进行按键过滤<br>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; //在这里添加你要屏蔽的键值<br>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; blEatKeystroke :=<br>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;(((p^.vkCode = VK_TAB) and<br>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;((p^.flags and LLKHF_ALTDOWN) &lt;&gt; 0)) or<br>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;((p^.vkCode = VK_ESCAPE) and<br>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;((p^.flags and LLKHF_ALTDOWN) &lt;&gt; 0)) or<br>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;((p^.vkCode = VK_ESCAPE) and<br>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;((GetKeyState(VK_CONTROL) and $8000) &lt;&gt; 0)) or<br>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;((p^.vkCode = VK_LWIN) or (p^.vkCode = VK_RWIN)) or<br>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;((p^.vkCode = VK_DELETE) and<br>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;((p^.flags and LLKHF_ALTDOWN) &lt;&gt; 0) and<br>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;((GetKeyState(VK_CONTROL) and $8000) &lt;&gt; 0)));<br>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp;end;<br>&nbsp; &nbsp; &nbsp; end; // End of Case<br>&nbsp; &nbsp;end;<br>&nbsp; &nbsp;if blEatKeystroke then<br>&nbsp; &nbsp; &nbsp; Result := 1 &nbsp; &nbsp; &nbsp; // 捕获这些组合键，按键消息由自己处理，必须返回 1<br>&nbsp; &nbsp;else<br>&nbsp; &nbsp; // 其他的按键，交由别的线程处理（过滤）<br>&nbsp; &nbsp; &nbsp; Result := CallNextHookEx(0, nCode, w_Param, l_Param);<br>end;<br><br>function EnableHotKeyHook: BOOL; export;<br>begin<br>&nbsp; &nbsp;Result := False;//初始化返回值<br>&nbsp; &nbsp;if hNextHookProc&lt;&gt;0 then//如果已经注册，直接退出<br>&nbsp; &nbsp; &nbsp; Exit;<br>&nbsp; &nbsp;hNextHookProc:=SetWindowsHookEx(WH_KEYBOARD_LL,KeyboardHookHandler,HInstance,0);<br><br>//注册hook<br>&nbsp; &nbsp;Result:=hNextHookProc &lt;&gt; 0;//通过返回值确定是否注册成功<br>end;<br><br>function DisableHotKeyHook: BOOL; export;<br>begin<br>&nbsp; &nbsp;if hNextHookProc&lt;&gt;0 then<br>&nbsp; &nbsp;begin<br>&nbsp; &nbsp; &nbsp; UnhookWindowshookEx(hNextHookProc);//解除Keyboard Hook<br>&nbsp; &nbsp; &nbsp; hNextHookProc:=0;//恢复标志<br>&nbsp; &nbsp;end;<br>&nbsp; &nbsp;Result:=hNextHookProc=0;//返回是否注销成功<br>end;<br><br>procedure HotKeyHookExit;<br>begin<br>&nbsp; &nbsp;if hNextHookProc&lt;&gt;0 then DisableHotKeyHook;//如果忘了解除HOOK,自动代理解除动作<br>&nbsp; &nbsp;ExitProc:=procSaveExit;<br>end;<br><br>end.<br><br>

如果还不行，江南大米会告诉你一个更绝的：<br>想不想知道　？想！<br>我替江南大米说了：把win挖出来！！

app2001提供的源码注解太少，不能参透！非常感谢帮助！<br><br>hbqckzj提供的源码简单，注解很多，非常实用。谢谢！