还来月如钩云盘

听描述的应该是《渔童》/好久以前的了

键盘钩子如下分类：

1、进程钩子：就是只是捕获某一个特定进程的键盘输入。

2、程序钩子，只捕获某一个程序的键盘输入。

3、全局钩子，可以捕获所有进程或者程序的键盘输入。

钩子？什么键盘有钩子，没见过呀，是不是那个键盘上面的角？如果是角，那是人体工程学设计让常时间用键盘的人手不用那个累的

一． 按事件分类，有如下的几种常用类型

（1） 键盘钩子和低级键盘钩子可以监视各种键盘消息。
（2） 鼠标钩子和低级鼠标钩子可以监视各种鼠标消息。
（3） 外壳钩子可以监视各种Shell事件消息。比如启动和关闭应用程序。
（4） 日志钩子可以记录从系统消息队列中取出的各种事件消息。
（5） 窗口过程钩子监视所有从系统消息队列发往目标窗口的消息。
此外，还有一些特定事件的钩子提供给我们使用，不一一列举。

底层键盘钩子 由于是最底层的，系统的消息会优先发到底层沟子的函数里，让你获得优先处理消息的能力。举例：如果在程序里安装了一般的键盘钩子，你想屏蔽掉所有程序的F1键，但事与愿违。因为一般键盘钩子并没有获得足够的优先权。但安装了底层钩子，所以消息都会先发给这个钩子的消息处理函数，你在函数里屏蔽掉按键F1的消息后，其他程序就再也收不到F1这个按键消息了。
希望我所说的对你有所帮助！

一般是网络的

提要钩玄、
钩心斗角、
姜太公钓鱼，愿者上钩、
窃钩者诛，窃国者侯、
研精钩深、
钩爪锯牙、
探赜钩深、
钩章棘句、
窃钩窃国、
钩深极奥、
钩金舆羽、
摄魄钩魂、
唾玉钩银、
钩玄猎秘、
盗玉窃钩、
钩深图远、
铁画银钩、
伸钩索铁、
钩深致远、
钩元摘秘、
太公钓鱼，愿者上钩、
钩辀格磔、
银钩虿尾、
钩深索隐

你自己不努力，自暴自弃。哪年都不顺

如果你不需要屏蔽Ctrl+Alt+Del组合键,可以使用低级键盘钩子(WH_KEYBOARD_LL)与低级鼠标钩子(WH_MOUSE_LL),这两种消息钩子的好处是不需要放在动态链接库中就可以作全局钩子,将键盘消息与鼠标消息截获.

unit uHookKeyAndMouse;
{ 该单元利用WH_KEYBOARD_LL与WH_MOUSE_LL两种类型的钩子分别截获键盘消息与鼠标消息}
{ 由于这里只是需要将消息屏蔽,故只需对钩子函数的返回结果设为1即可. }
{ 提供两个函数StartHookKeyMouse与StopHookKeyMouse两个函数. }

interface

uses
Windows, Messages, SysUtils;

const
WH_KEYBOARD_LL =13;
WH_MOUSE_LL =14;

procedure StartHookKeyMouse;
procedure StopHookKeyMouse;

implementation

var
hhkLowLevelKybd:HHook=0;
hhkLowLevelMouse:HHook=0;

function LowLevelKeyboardProc(nCode:Integer; WParam:WPARAM; LParam:LPARAM):LRESULT; stdcall;
begin
Result:=1;
if nCode<>0 then Result:=CallNextHookEx(0,nCode,WParam,LParam);
end;

function LowLevelMouseProc(nCode:Integer; WParam:WPARAM; LParam:LPARAM):LRESULT; stdcall;
begin
Result:=1;
if nCode<>0 then Result:=CallNextHookEx(0,nCode,WParam,LParam);
end;

procedure StartHookKeyMouse;
begin
if hhkLowLevelKybd = 0 then
begin
hhkLowLevelKybd := SetWindowsHookEx(WH_KEYBOARD_LL, LowLevelKeyboardProc, Hinstance, 0);
end;
if hhkLowLevelMouse = 0 then
begin
hhkLowLevelMouse:=SetWindowsHookEx(WH_MOUSE_LL,LowlevelMouseProc,HInstance,0);
end;
end;

procedure StopHookKeyMouse;
begin
if hhkLowLevelKybd <> 0 then
begin
UnhookWindowsHookEx(hhkLowLevelKybd);
hhkLowLevelKybd:=0;
end;
if hhkLowLevelMouse <> 0 then
begin
UnHookWindowsHookEx(hhkLowLevelMouse);
hhkLowLevelMouse:=0;
end;
end;

initialization
hhkLowLevelKybd:=0;
hhkLowLevelMouse:=0;
finalization
if hhkLowLevelKybd <> 0 then UnhookWindowsHookEx(hhkLowLevelKybd);
if hhkLowLevelMouse <> 0 then UnhookWindowsHookEx(hhkLowLevelMouse);
end.

你和一个槐液人打钩钩，用小指，然后把手翻过来，看一下中间的空隙构成了个什么图案？呵呵铅桐物，知道为轮握什么了吧．．！