全局钩子不全局？

[bj_leo_2000]

钩子dll代码如下：
#include "stdafx.h"
#pragma data_seg("ShareData")
HHOOK ghMouseHook=NULL;
HINSTANCE ghInstance=NULL;
HWND ghWnd=NULL;
#pragma data_seg()

#define WM_MOUSEINFO WM_USER + 100
//---------------------------------------------------------------------------
struct MOUSEINFO
{
HANDLE mhWnd; //鼠标停留窗口句柄
int miPosX;
int miPosY;
};
extern "C" __declspec(dllexport) void SetWindowHandle(HANDLE ahWnd);
extern "C" __declspec(dllexport) int StartGetWord();
extern "C" __declspec(dllexport) int StopGetWord();

BOOL APIENTRY DllMain( HANDLE hModule,
DWORD ul_reason_for_call,
LPVOID lpReserved
)
{
switch (ul_reason_for_call)
{
case DLL_PROCESS_ATTACH:
ghInstance = (HINSTANCE)hModule;
case DLL_THREAD_DETACH:
if (ghMouseHook != NULL)
{
UnhookWindowsHookEx(ghMouseHook);
ghMouseHook = NULL;
}
}
return TRUE;
}

LRESULT CALLBACK MyHookProc(int aiCode ,WPARAM wParam,LPARAM lParam)
{
if(aiCode<0)
return CallNextHookEx(ghMouseHook,aiCode,wParam,lParam);
LPMOUSEHOOKSTRUCT lpMouse=(MOUSEHOOKSTRUCT *)lParam;
MOUSEINFO * lpInfo = new MOUSEINFO;
lpInfo->mhWnd = lpMouse->hwnd;
lpInfo->miPosX = lpMouse->pt.x;
lpInfo->miPosY = lpMouse->pt.y;
::SendMessage(ghWnd,WM_MOUSEINFO,(WPARAM)lpInfo,0);
delete lpInfo;
return CallNextHookEx(ghMouseHook,aiCode,wParam,lParam);
}

extern "C" void SetWindowHandle(HANDLE ahWnd)
{
ghWnd = (HWND)ahWnd;
}

extern "C" int StartGetWord()
{
ghMouseHook = SetWindowsHookEx(WH_MOUSE,(HOOKPROC)MyHookProc,ghInstance,NULL);
if(ghMouseHook == NULL)
return 1;
return 0;
}

extern "C" int StopGetWord()
{
if(ghMouseHook != NULL)
{
UnhookWindowsHookEx(ghMouseHook);
ghMouseHook = NULL;
}
return 0;
}

我用BCB做的exe程序调用，装载钩子后钩子只在这个exe程序活动，鼠标在这个程序的窗口中才会接收到dll发送来的消息。鼠标移到exe程序外的其他程序就没有消息了。

[cnzdgs]

switch (ul_reason_for_call)
{
case DLL_PROCESS_ATTACH:
ghInstance = (HINSTANCE)hModule;
break;
case DLL_THREAD_DETACH:
if (ghMouseHook != NULL)
{
UnhookWindowsHookEx(ghMouseHook);
ghMouseHook = NULL;
} }

MOUSEINFO要定义为共享数据，不然在你的进程中无法访问从其它进程发来的消息，最好是把鼠标信息合成wParam和lParam。

[tccqs]

up and mark,,

[Yofoo]

发现代码两个问题:

1: case DLL_PROCESS_ATTACH:
ghInstance = (HINSTANCE)hModule;

全局Hook 会多次DLL_PROCESS_ATTACH, 如果卸载后再Hook, ghInstance会不对

2. MOUSEINFO * lpInfo = new MOUSEINFO;
::SendMessage(ghWnd,WM_MOUSEINFO,(WPARAM)lpInfo,0);
new出来的对象只对本进程有效, SendMessage传递指针, 别的进程使用是不对的

[Kudeet]

应该不是全局无效造成的，内存共享区域有问题，可以用CreateFileMapping等方式创建共享区域

[chenyu2202863]

楼只有，你也在做取词阿？
我也在做，我能全局，但是取词速度太快~ 还没解决

[zhoujianhei]

case DLL_THREAD_DETACH: 
if (ghMouseHook != NULL)  
{ 
//UnhookWindowsHookEx(ghMouseHook); 
//ghMouseHook = NULL; 
} 
} 

[bj_leo_2000]

请楼上各位能详细说一下吗？

[bj_leo_2000]

哪位能给一份不是MFC DLL的全局钩子和调用程序的源码，我已经晕菜了。

[zhoujianhei]

我的代码太复杂，怕你一下子接受不了。

[bj_leo_2000]

网上都是MFC的例子，想找个非MFC的真费劲。楼上兄弟能否给我共享一下啊！[e-mail],谢了！

[scq2099yt]

up

[zhoujianhei]

查收,如用于商业目的，给我发个邮件就可以啦。

[zhoujianhei]

呵呵。

[bj_leo_2000]

多谢！

[bj_leo_2000]

现在一移出exe程序窗口就报度0地址错误