把鼠标关标滑过一个窗口时,该窗口的有关消息将显示在主窗口中。当您按下“Unhook”时,应用程序将卸载钩子。主窗口使用一个对话框来作为它的主窗口。它自定义了一个消息WM_MOUSEHOOK,用来在主窗口和DLL之间传递消息。当主窗口接收到该消息时,wParam中包含了光标所在位置的窗口的句柄。当然这是我们做的安排。我这么做只是为了方便。您可以使用您自己的方法在主应用程序和DLL之间进行通讯。 %cBOi_}}~
Yr>0Qg],
.if HookFlag==FALSE iCCe8nK
]E)\>Jb
invoke InstallHook,hDlg @$iZ9x6t
=
5[%%Lf
.if eax!=NULL nw_s:
L4Kg%icz l
mov HookFlag,TRUE a l9(
9)
_%Yi^^
invoke SetDlgItemText,hDlg,IDC_HOOK,addr UnhookText Uq~b4 X$
UD.ZnE{"
.endif efE=5%O
":q+"*fy
4I .'./u
TZGk[u^*
该应用程序有一个全局变量,HookFlag,它用来监视钩子的状态。如果安装来钩子它就是TRUE,否则是FALSE。当用户按下Hook按钮时,应用程序检查钩子是否已经安装。如果还没有的话,它将调用DLL中引出的函数InstallHook来安装它。注意我们把主对话框的句柄传递给了DLL,这样这个钩子DLL就可以把WM_MOUSEHOOK消息传递给正确的窗口了。当应用程序加载时,钩子DLL也同时加载。时机上当主程序一旦加载到内存中后,DLL就立即加载。DLL的入口点函数载主程序的第一条语句执行前就前执行了。所以当主程序执行时,DLL已经初始化好了。我们载入口点处放入如下代码: Mdh]qKw
jo3(\Bq
.FV^hrJxI;
4LW~
.if reason==DLL_PROCESS_ATTACH 9tb-;|
bZr,jLEf
push hInst ?1zGs2Qs
^;F5ymb3U
pop hInstance Xvoz4'Gme
1Wiz0X/
.endif wS+!>Q_]w
b- bvkPN
X8ZO
} X
sT "q]
该段代码把DLL自己的实例句柄放到一个全局变量中保存。由于入口点函数是在所有函数调用前被执行的,所以hInstance总是有效的。我们把该变量放到.data中,使得每一个进程都有自己一个该变量的值。因为当鼠标光标停在一个窗口上时,钩子DLL被映射进进程的地址空间。加入在DLL缺省加载的地址处已经加载其它的DLL,那钩子DLL将要被映射到其他的地址。hInstance将被更新成其它的值。当用户按下Unhook再按下Hook时,SetWindowsHookEx将被再次调用。这一次,它将把新的地址作为实例句柄。而在例子中这是错误的,DLL装载的地址并没有变。这个钩子将变成一个局部的,您只能钩挂发生在您窗口中的鼠标事件,这是很难让人满意的。 i+pQ 7wx
c&,q`_t
29CzG0?B
A\W)uwyN
InstallHook proc hwnd:DWORD tCm]1ZgRW
f/s" 2r
push hwnd 9|[uie
bub6{MQW8e
pop hWnd zG8g}FrzG;
NqGSoOjIO2
invoke SetWindowsHookEx,WH_MOUSE,addr MouseProc,hInstance,NULL 8!HB$vdw7
cx ("F/Jm
mov hHook,eax h&n1}W+
z&Aya*0v`
ret t\a|Gp W
p&5>j\uJ1&
InstallHook endp y/kB`Z(Yj
CJ7S5
qVI0?B
x
=9W\;xE S
InstallHook 函数非常简单。它把传递过来的窗口句柄保存在hWnd中以备后用。接着调用SetWindowsHookEx函数来安装一个鼠标钩子。该函数的返回值放在全局变量hHook中,将来在UnhookWindowsHookEx中还要使用。在调用SetWindowsHookEx后,鼠标钩子就开始工作了。无论什么时候发生了鼠标事件,MouseProc函数都将被调用: rV4K@)~
sH_,P
KU*aJl_n,
4=EA3`l
MouseProc proc nCode:DWORD,wParam:DWORD,lParam:DWORD 7S^G]g!x
8qaU[u&$
invoke CallNextHookEx,hHook,nCode,wParam,lParam g<,0kl2'S
0 q1x+
mov edx,lParam 0
x' d^
d0C _:_
assume edx:PTR MOUSEHOOKSTRUCT 6GPI
gPL,
wW/q#kc
invoke WindowFromPoint,[edx].pt.x,[edx].pt.y X/90S2=P
c8Ud<M .
invoke PostMessage,hWnd,WM_MOUSEHOOK,eax,0 z1
MT@G)S$
6/?onEL9_
assume edx:nothing eB=&(ZT
Gi#-TP\
xor eax,eax %vm_v.Q4)
&xhwOgI