把鼠标关标滑过一个窗口时,该窗口的有关消息将显示在主窗口中。当您按下“Unhook”时,应用程序将卸载钩子。主窗口使用一个对话框来作为它的主窗口。它自定义了一个消息WM_MOUSEHOOK,用来在主窗口和DLL之间传递消息。当主窗口接收到该消息时,wParam中包含了光标所在位置的窗口的句柄。当然这是我们做的安排。我这么做只是为了方便。您可以使用您自己的方法在主应用程序和DLL之间进行通讯。 kT@ITA22
`Ow]@flLI
.if HookFlag==FALSE '0+I' _(
ZwMVFC-d
invoke InstallHook,hDlg 6LDZ|K@
a 20w.6F
.if eax!=NULL iP(MDVg
>j=ZB3yZ
mov HookFlag,TRUE U7g`R@
$#hU_vr
invoke SetDlgItemText,hDlg,IDC_HOOK,addr UnhookText E'f7=ChNF
&gXL{cK'%
.endif %1A8m-u]M
89&9VX^A
0vqH-)}
y$R8J:5f
该应用程序有一个全局变量,HookFlag,它用来监视钩子的状态。如果安装来钩子它就是TRUE,否则是FALSE。当用户按下Hook按钮时,应用程序检查钩子是否已经安装。如果还没有的话,它将调用DLL中引出的函数InstallHook来安装它。注意我们把主对话框的句柄传递给了DLL,这样这个钩子DLL就可以把WM_MOUSEHOOK消息传递给正确的窗口了。当应用程序加载时,钩子DLL也同时加载。时机上当主程序一旦加载到内存中后,DLL就立即加载。DLL的入口点函数载主程序的第一条语句执行前就前执行了。所以当主程序执行时,DLL已经初始化好了。我们载入口点处放入如下代码: 8?nn4]P
s5@BVD'}E
BjH|E@z
aH6j,R%
.if reason==DLL_PROCESS_ATTACH fS4foMI63)
q0+N#$g#
push hInst -NwG'
U~
` 7iA?;
pop hInstance %Y ZCdS
fxcE1=a
.endif FvT4?7-
*1dZs~_
W8 g13oAu"
}'P|A
该段代码把DLL自己的实例句柄放到一个全局变量中保存。由于入口点函数是在所有函数调用前被执行的,所以hInstance总是有效的。我们把该变量放到.data中,使得每一个进程都有自己一个该变量的值。因为当鼠标光标停在一个窗口上时,钩子DLL被映射进进程的地址空间。加入在DLL缺省加载的地址处已经加载其它的DLL,那钩子DLL将要被映射到其他的地址。hInstance将被更新成其它的值。当用户按下Unhook再按下Hook时,SetWindowsHookEx将被再次调用。这一次,它将把新的地址作为实例句柄。而在例子中这是错误的,DLL装载的地址并没有变。这个钩子将变成一个局部的,您只能钩挂发生在您窗口中的鼠标事件,这是很难让人满意的。 1!1JT;gG^9
4~Cf_`X}]
Jq` Dvz
G ky*EY
InstallHook proc hwnd:DWORD m-O*t$6
j_rO_m <8
push hwnd :(~<BiqR(
nN{DO:_o
pop hWnd RkG?R3e
P}Ig6^[m\
invoke SetWindowsHookEx,WH_MOUSE,addr MouseProc,hInstance,NULL F\JS?zt2
%DiQTg7V,
mov hHook,eax i
7]o[
AJ/Hw>>$?m
ret 4xW~@meNB
@JlT*:Dz
InstallHook endp )isS^O$qH
M]5l-i$
oi0O4J%H
n8EKTuy
InstallHook 函数非常简单。它把传递过来的窗口句柄保存在hWnd中以备后用。接着调用SetWindowsHookEx函数来安装一个鼠标钩子。该函数的返回值放在全局变量hHook中,将来在UnhookWindowsHookEx中还要使用。在调用SetWindowsHookEx后,鼠标钩子就开始工作了。无论什么时候发生了鼠标事件,MouseProc函数都将被调用: Ja3#W
K
{Ycgq%1>]
9mDdX
-I5]#%eX^
MouseProc proc nCode:DWORD,wParam:DWORD,lParam:DWORD 9\!&c<i=
,.P]5 lE
invoke CallNextHookEx,hHook,nCode,wParam,lParam Jzf+"%lv
PJB_"?NTTC
mov edx,lParam 1^$hbRq
LE}`rW3
assume edx:PTR MOUSEHOOKSTRUCT ??nT[bhQ
_]*[TGap
invoke WindowFromPoint,[edx].pt.x,[edx].pt.y Mt4]\pMUb
HCOsVTl,
invoke PostMessage,hWnd,WM_MOUSEHOOK,eax,0 0t!ZMH
.'M.yE~5J
assume edx:nothing my sXgS&