研究

研究+顶
不会哦

研究
顶
关注

关注...

up

没找到InitializeLpkHooks这个函数，是自定义的吧。既然是截获键盘事件，在程序中截获消息并判断处理不就好了，我键盘上没有那几个键，所以无法测试。

已经确认hook_keyboard, hook_keyboard_ll都抓不到这个键盘击键消息。
我写驱动去截获硬件的键盘中断可以抓到，
但是我现在希望在应用层用hook实现，找到有一个例子，但没有源代码。
分析它的dll，确定是调用了hook，此外最有关联的调用就是InitializeLpkHooks和GetMessageExtraInfo。所以希望能多了解一点这两个函数的作用和调用方式

InitializeLpkHooks应该是自己定义个函数。

怎么这么多高手都没人知道？？？
InitializeLpkHooks是user32.dll里的一个未公开函数，查msdn都查不到的，查google就只查到四条记录，而且最多只得到一个函数定义。
我不知道这个函数到底在hook什么，也不知道它的参数是个函数指针，这个函数指针的定义和参数是什么？？？

ding

帮顶

这么神奇
未公开的函数..那我们怎么调用这个函数呢？

一个未公开函数InitializeLpkHooks，这个函数在网上能找到的资料更少，只有一个声明而已。但是它名称中最后那个“Hooks”误导了我，我以为又是一个可以用来注入DLL的不错函数，用OD反出来一看，原来只是个局部HOOK而已。虽然没太大用，还是一并写上吧，也许谁用得着呢。InitializeLpkHooks顾名思义就是HOOK LPK的，Windows有个lpk.dll，就是支持多语言包的那么个功能。测试发现好多程序在TextOut之前似乎是要调用lpk.dll里面的相关函数的，可能是支持多语言的程序就需要用这个来判断到底要显示那种语言吧。而InitializeLpkHooks，就是用来HOOK lpk.dll里面的4个函数的，这4个函数是LpkTabbedTextOut，LpkPSMTextOut，LpkDrawTextEx，LpkEditControl。我们先打开VB，在窗体中加入以下代码吧： 
Private Sub Form_Load() 
DLLhwnd = LoadLibrary("lpk.dll") '加载DLL 
DLLFunDre = GetProcAddress(DLLhwnd, "LpkDrawTextEx") '获取回调函数地址 

LpkHooksInfo.lpHookProc_LpkTabbedTextOut = 0 
LpkHooksInfo.lpHookProc_LpkPSMTextOut = 0 
LpkHooksInfo.lpHookProc_LpkDrawTextEx = GetLocalProcAdress(AddressOf HookProc1) '设置要HOOK的LPK函数 
LpkHooksInfo.lpHookProc_LpkEditControl = 0 
InitializeLpkHooks LpkHooksInfo 
End Sub 

Private Sub Form_Unload(Cancel As Integer) 
LpkHooksInfo.lpHookProc_LpkTabbedTextOut = 0 
LpkHooksInfo.lpHookProc_LpkPSMTextOut = 0 
LpkHooksInfo.lpHookProc_LpkDrawTextEx = DLLFunDre 
LpkHooksInfo.lpHookProc_LpkEditControl = 0 
InitializeLpkHooks LpkHooksInfo 
FreeLibrary DLLhwnd 
End Sub 


然后新建一个模块，在模块中加入以下代码： 
Public Declare Funti*n LoadLibrary Lib "kernel32" Alias "LoadLibraryA" (ByVal lpLibFileName As String) As Long 
Public Declare Fun*ti*n GetProcAddress Lib "kernel32" (ByVal hModule As Long, ByVal lpProcName As String) As Long 
Public Declare Fun*ti*n FreeLibrary Lib "kernel32" (ByVal hLibModule As Long) As Long 
' ----------------未公开函数-------------------------------------- 
Public Declare Sub InitializeLpkHooks Lib "user32" (lpProcType As Any) 

Type LpkHooksSetting 
 lpHookProc_LpkTabbedTextOut As Long 
 lpHookProc_LpkPSMTextOut As Long 
 lpHookProc_LpkDrawTextEx As Long 
 lpHookProc_LpkEditControl As Long 
End Type 

' ------------------------------- 
Public DLLhwnd As Long, DLLFunDre As Long 
Public LpkHooksInfo As LpkHooksSetting 

Public Fun*ti*n GetLocalProcAdress(ByVal lpProc As Long) As Long 
GetLocalProcAdress = lpProc 
End Fun*ti*n 

Fun*ti*n HookProc1(ByVal a1 As Long, ByVal a2 As Long, ByVal a3 As Long, ByVal a4 As Long, ByVal a5 As Long, ByVal a6 As Long, ByVal a7 As Long, ByVal a8 As Long, ByVal a9 As Long, ByVal a10 As Long) As Long 
HookProc1 = 0 
End Fun*ti*n 

运行一下看看，是不是窗体中标题栏和按钮上的文字都没有了，因为我们把函数LpkDrawTextEx替换成自己的函数HookProc1了。这个函数有10个参数，其中几个好像是字符串指针，似乎可以用来截获窗体要显示的文字，然后改成另一种语言的文字，我猜想，也许就是这个用途吧。哈哈，纯属猜测。以上就是函数InitializeLpkHooks的用法了。 

以上就是全部。  
本文所有示例代码的下载地址是： http://www.pen88.com/download/imehook.rar