利用底层键盘钩子拦载任意按键回调版.docx
《利用底层键盘钩子拦载任意按键回调版.docx》由会员分享，可在线阅读，更多相关《利用底层键盘钩子拦载任意按键回调版.docx（13页珍藏版）》请在冰豆网上搜索。
利用底层键盘钩子拦载任意按键回调版
利用底层键盘钩子拦载任意按键（回调版）
--------------------------------------------------------------------------------
发表日期：
2007年1月12日出处：
goodname008的Blog作者：
卢培培（（goodname008）【编辑录入：
webmaster】
前段时间我曾经写过一篇《利用底层键盘钩子屏蔽任意按键》，并放到了我的blog上。
这篇文章的题目中把“屏蔽”改成了“拦截”，显然要比以前的版本强一些了。
对于以前写的那个DLL，有一个不够理想的地方，就是仅仅能实现屏蔽。
如果想在屏蔽之前加入一些“小动作”，就只能修改DLL，在LowLevelKeyboardProc函数中添加代码，实现新的功能。
但这样显然不够灵活，这样的DLL也不具备一般性了。
所以我自然而然地想到了回调，Windows中有很多需要回调函数的API，我们当然也可以写出这样的API，这样做的好处就是可以给DLL调用程序留下足够的接口。
此时，DLL就像一个阀门，我们不关心的按键消息就把它放过去，只把我们关心的按键消息拦截下来，然后进一步处理，而这些处理的代码就写在DLL调用程序的回调函数中，这样做是最理想不过的了。
相对于前一个版本，修改后的DLL源代码如下：
/********************************************************************/
/*文件名:
MaskKey.cpp*/
/**/
/*功能:
标准DLL----利用底层键盘钩子实现拦截键盘任意按键*/
/**/
/*作者:
卢培培（goodname008）时间:
2005.1.18*/
/**/
/*BLOG:
*/
/********************************************************************/
//导出函数列表
//StartMaskKey
//StopMaskKey
#define_WIN32_WINNT0x0500//设置系统版本,确保可以使用底层键盘钩子
#include"windows.h"
//回调函数指针
typedefBOOL（CALLBACK*LPFNKEYBOARDPROC）（WPARAM,KBDLLHOOKSTRUCT*）;
//全局变量
LPDWORDg_lpdwVirtualKey=NULL;//Keycode数组的指针
intg_nLength=0;//Keycode数组的大小
BOOLg_bDisableKeyboard=FALSE;//是否屏蔽整个键盘
HINSTANCEg_hInstance=NULL;//模块实例句柄
HHOOKg_hHook=NULL;//钩子句柄
LPFNKEYBOARDPROCg_lpfnKeyboardProc;//键盘钩子回调函数指针
//DLL入口函数
BOOLAPIENTRYDllMain（HANDLEhModule,DWORDul_reason_for_call,LPVOIDlpReserved）
{
//保存模块实例句柄
g_hInstance=（HINSTANCE）hModule;
//在进程结束或线程结束时卸载钩子
switch（ul_reason_for_call）
{
caseDLL_PROCESS_ATTACH:
break;
caseDLL_THREAD_ATTACH:
break;
caseDLL_PROCESS_DETACH:
caseDLL_THREAD_DETACH:
free（g_lpdwVirtualKey）;
if（g_hHook!
=NULL）UnhookWindowsHookEx（g_hHook）;
break;
}
returnTRUE;
}
//底层键盘钩子函数
LRESULTCALLBACKLowLevelKeyboardProc（intnCode,WPARAMwParam,LPARAMlParam）
{
//拦截键盘的某些按键,如果g_bDisableKeyboard为TRUE则拦截整个键盘按键
if（nCode>=HC_ACTION）
{
KBDLLHOOKSTRUCT*pStruct=（KBDLLHOOKSTRUCT*）lParam;
if（g_bDisableKeyboard）
if（g_lpfnKeyboardProc（wParam,pStruct））
returnCallNextHookEx（g_hHook,nCode,wParam,lParam）;
else
returntrue;
LPDWORDtmpVirtualKey=g_lpdwVirtualKey;
for（inti=0;i{
if（pStruct->vkCode==*tmpVirtualKey++）
if（g_lpfnKeyboardProc（wParam,pStruct））
returnCallNextHookEx（g_hHook,nCode,wParam,lParam）;
else
returntrue;
}
}
//调用系统中的下一个钩子
returnCallNextHookEx（g_hHook,nCode,wParam,lParam）;
}
/********************************************************************/
/*开始拦截键盘按键*/
/**/
/*参数:
*/
/*lpdwVirtualKeyKeycode数组的指针*/
/*nLengthKeycode数组的大小*/
/*bDisableKeyboard是否拦截整个键盘*/
/**/
/*返回值:
TRUE成功,FALSE失败*/
/********************************************************************/
BOOLWINAPIStartMaskKey（LPDWORDlpdwVirtualKey,intnLength,
LPFNKEYBOARDPROClpfnKeyboardProc,BOOLbDisableKeyboard=FALSE）
{
//如果已经安装键盘钩子则返回FALSE
if（g_hHook!
=NULL||nLength==0）returnFALSE;
//将用户传来的keycode数组保存在全局变量中
g_lpdwVirtualKey=（LPDWORD）malloc（sizeof（DWORD）*nLength）;
LPDWORDtmpVirtualKey=g_lpdwVirtualKey;
for（inti=0;i{
*tmpVirtualKey++=*lpdwVirtualKey++;
}
g_nLength=nLength;
g_bDisableKeyboard=bDisableKeyboard;
g_lpfnKeyboardProc=lpfnKeyboardProc;
//安装底层键盘钩子
g_hHook=SetWindowsHookEx（WH_KEYBOARD_LL,LowLevelKeyboardProc,g_hInstance,NULL）;
if（g_hHook==NULL）returnFALSE;
returnTRUE;
}
/********************************************************************/
/*停止拦截键盘按键*/
/**/
/*参数:
（无）*/
/**/
/*返回值:
TRUE成功,FALSE失败*/
/********************************************************************/
BOOLWINAPIStopMaskKey（）
{
//卸载钩子
if（UnhookWindowsHookEx（g_hHook）==0）returnFALSE;
g_hHook=NULL;
returnTRUE;
}
当然了，MaskKey.h头文件中也要加上：
//回调函数指针
typedefBOOL（CALLBACK*LPFNKEYBOARDPROC）（WPARAM,KBDLLHOOKSTRUCT*）;
下面是在VC中调用的例子：
（两个Dialog的成员函数，对应两个按钮，再加上一个回调函数）
//全局键盘钩子回调函数
//参数:
action标识键盘消息（按下,弹起）,keyStruct包含按键信息
BOOLCALLBACKKeyboardProc（WPARAMaction,KBDLLHOOKSTRUCT*pKeyStruct）
{
//判断按键动作
switch（action）
{
caseWM_KEYDOWN:
break;
caseWM_KEYUP:
break;
caseWM_SYSKEYDOWN:
break;
caseWM_SYSKEYUP:
break;
}
//返回true表示继续传递按键消息
//返回false表示结束按键消息传递
returnfalse;
}
voidCMaskKeyAppDlg:
:
OnStartmaskkey（）
{
//屏蔽A,B,C,上,下,左,右及两个win键
DWORDdwVK[]={'A','B','C',VK_LEFT,VK_RIGHT,VK_UP,VK_DOWN,VK_LWIN,VK_RWIN};
intnLength=sizeof（dwVK）/sizeof（DWORD）;
StartMaskKey（dwVK,nLength,KeyboardProc）;
}
voidCMaskKeyAppDlg:
:
OnStopmaskkey（）
{
StopMaskKey（）;
}
呵呵，这样是不是让看到这里的你很兴奋呢？
！
StartMaskKey加了一个参数，是个函数指针，这是我们非常熟悉的回调函数的使用方法。
DLL中的StartMaskKey函数收到这个函数指针后保存在了g_lpfnKeyboardProc变量中，然后在LowLevelKeyboardProc中一旦发现了要拦截的按键，就会通过函数指针调用回调函数，将控制权完全交回给DLL的调用程序，由回调函数KeyboardProc进一步处理（播放一小段音乐，还是执行个什么有意思的程序，亦或是重启关机什么的。
呃，随你便了。
:
D），action参数用来标识键盘消息（按下或弹起），pKeyStruct参数包含了丰富的按键信息，其实就是系统传给LowLevelKeyboardProc的lParam，我又把它原封不动地传给了KeyboardProc，呵呵。
最重要的就是回调函数的返回值了，它就像阀门的开关一样，将决定这个按键消息的命运。
从DLL中的LowLevelKeyboardProc函数的流程可以看出，如果回调函数KeyboardProc的返回值为true则表示把该按键消息继续传递给系统中的下一个钩子；如果为false则表示结束该按键消息的传递，此时将会起到拦截按键的效果。
用VB的人可能有些不耐烦了，别着急，上篇文章在最后给出了VB调用的例程，此篇当然不能缺少这部分了。
下面是在VB中调用的例子：
（在窗体上添加2个CommandButton，并分别改名为cmdStartMask和cmdStopMask）
OptionExplicit
PrivateDeclareFunctionStartMaskKeyLib"MaskKey"（lpdwVirtualKeyAsLong,ByValnLengthAsLong,ByVallpfnKeyboarProcAsLong,OptionalByValbDisableKeyboardAsBoolean=False）AsLong
PrivateDeclareFunctionStopMaskKeyLib"MaskKey"（）AsLong
PrivateSubcmdStartMask_Click（）
'屏蔽A,B,C,上,下,左,右及两个win键
Dimkey（8）AsLong
key（0）=vbKeyA
key
（1）=vbKeyB
key
（2）=vbKeyC
key（3）=vbKeyLeft
key（4）=vbKeyRight
key（5）=vbKeyUp
key（6）=vbKeyDown
key（7）=&H5B'左边的win键
key（8）=&H5C'右边的win键
StartMaskKeykey（0）,UBound（key）+1,AddressOfKeyboardProc
EndSub
PrivateSubcmdStopMask_Click（）
StopMaskKey
EndSub
窗体模块的代码和以前的例程几乎一样，只是在调用StartMaskKey函数时加了一个参数：
AddressOfKeyboardProc。
在VB中用过回调函数的人对这东西绝不会陌生，AddressOf是一个一元运算符，后面接一个函数名，它的功能就是获得指定函数的指针。
但有一点必须注意，该回调函数（此例中为KeyboardProc）必须写在VB的标准模块中，标准模块的代码如下：
OptionExplicit
PrivateConstWM_KEYDOWN=&H100
PrivateConstWM_KEYUP=&H101
PrivateConstWM_SYSKEYDOWN=&H104
PrivateConstWM_SYSKEYUP=&H105
PublicTypeKBDLLHOOKSTRUCT
vkCodeAsLong'虚拟按键码（1--254）
scanCodeAsLong'硬件按键扫描码
flagsAsLong'flags
timeAsLong'消息时间戳
dwExtraInfoAsLong'额外信息
EndType
PublicEnumKEYACTION
ACTION_KEYDOWN=WM_KEYDOWN
ACTION_KEYUP=WM_KEYUP
ACTION_SYSKEYDOWN=WM_SYSKEYDOWN
ACTION_SYSKEYUP=WM_SYSKEYUP
EndEnum
'全局键盘钩子回调函数
'参数:
action标识键盘消息（按下,弹起）,keyStruct包含按键信息
PublicFunctionKeyboardProc（ByValactionAsKEYACTION,keyStructAsKBDLLHOOKSTRUCT）AsBoolean
SelectCaseaction
CaseACTION_KEYDOWN
Debug.PrintkeyStruct.vkCode,"按下键盘按键"
CaseACTION_KEYUP
Debug.PrintkeyStruct.vkCode,"弹起键盘按键"
CaseACTION_SYSKEYDOWN
CaseACTION_SYSKEYUP
EndSelect
'返回True表示继续传递按键消息
'返回False表示结束按键消息传递
KeyboardProc=False
EndFunction
和VC版的调用例程差不多，只是把语法翻译成了VB的，这个VB标准模块中的KeyboardProc有没有点MFC消息映射函数的味道呢？
！
:
D
需要注意的是，VB的回调函数必须写在标准模块中。
细心的人还可能会发现，我对action参数作了一点小手脚，改成了一个枚举类型，这主要是为了易于理解。
OK，要写的就这么多了，关于全局键盘钩子的内容我也想告一段落了。
利用VC编写的DLL，VB也可以方便地实现全局键盘钩子了。
当然，这不仅仅局限于键盘钩子，利用这种方法可以实现任何类型的钩子。
升级会员 