关于VC编写鼠标全局钩子的一点改进[源代码]

最新推荐文章于 2025-07-17 16:35:53 发布

原创最新推荐文章于 2025-07-17 16:35:53 发布 · 3.3k 阅读

2 ·

本内容遵循CC 4.0 BY-SA版权协议

标签

#null #winapi #dll #thread #callback

本文是VB程序员的VC编码体验，介绍了一个标准DLL，利用鼠标全局钩子实现右键双击粘贴功能。代码包含DLL入口函数、底层鼠标钩子函数，以及安装、卸载钩子和关于信息的函数，还实现了单击鼠标中键复制数据到剪贴板的功能。

我这个VB程序员的VC编码体验

/********************************************************************/
/* 文件名: MyMouseHook.cpp           */
/*                 */
/* 功能: 标准 DLL ---- 利用鼠标全局钩子实现右键双击粘贴功能   */
/*                 */
/* 作者: 李博 (booolee)   时间: 2004.9.18      */
/*                 */
/* BLOG: http://blog.csdn.net/booolee        */
/********************************************************************/

// 导出函数列表
// StartHook
// StopHook
// About

#define _WIN32_WINNT 0x0500 // 设置系统版本, 确保可以使用底层鼠标钩子

#include "windows.h"
#include <string.h>

// 全局变量
HINSTANCE g_hInstance = NULL; // 模块实例句柄
HHOOK g_hHook = NULL; // 钩子句柄

// DLL 入口函数
BOOL APIENTRY DllMain(HANDLE hModule, DWORD ul_reason_for_call, LPVOID lpReserved)
{
// 保存模块实例句柄
g_hInstance = (HINSTANCE)hModule;

// 在进程结束或线程结束时卸载钩子
switch (ul_reason_for_call)
{
case DLL_PROCESS_ATTACH:
  break;
case DLL_THREAD_ATTACH:
  break;
case DLL_PROCESS_DETACH:
case DLL_THREAD_DETACH:
  if (g_hHook != NULL) UnhookWindowsHookEx(g_hHook);
  break;
}
    return TRUE;
}

// 底层鼠标钩子函数
LRESULT CALLBACK MouseHookProc(int nCode, WPARAM wParam, LPARAM lParam)
{
LPMOUSEHOOKSTRUCT pMouseHook=(MOUSEHOOKSTRUCT FAR *) lParam;
if (nCode>=0)
{
  //双击鼠标右键进行粘贴操作
  if (wParam==WM_RBUTTONDBLCLK)
  {
   HWND glhTargetWnd=pMouseHook->hwnd;
   if(glhTargetWnd !=NULL)
   {
     SendMessage(glhTargetWnd,WM_PASTE,0,0);
     return TRUE;
   }
  }
  //单击鼠标中键进行数据复制
  if(wParam==WM_MBUTTONUP)
  {
   HWND glhTargetWnd=pMouseHook->hwnd;
   LPTSTR tmpstr=NULL;
   char buf[100];
   SendMessage(glhTargetWnd,WM_GETTEXT,sizeof(buf)/sizeof(char),(LPARAM)(void*)buf);
   int dwLength = 100; // 要复制的字串长度
   HANDLE hGlobalMemory = GlobalAlloc(GHND, dwLength + 1); // 分配内存
   LPBYTE lpGlobalMemory = (LPBYTE)GlobalLock(hGlobalMemory); // 锁定内存
   for (int i = 0; i < dwLength-1; i++) // 将buf复制到全局内存块
   {
    //如果是米或平方米的单位字符，则不进行复制
    if(buf[i]!='m')
    {
     *lpGlobalMemory++ = buf[i];
    }
    else
    {
     break;
    }
   }
   GlobalUnlock(hGlobalMemory); // 锁定内存块解锁
   OpenClipboard(NULL);
   EmptyClipboard(); // 清空剪贴板
   SetClipboardData(CF_TEXT, hGlobalMemory); // 将内存中的数据放置到剪贴板
   CloseClipboard(); // 关闭剪贴板
   //MessageBox(NULL,buf,NULL,MB_OK);

   //通过消息方式进行复制代码开始
   //if(glhTargetWnd!=NULL)
   //{
   // SendMessage(glhTargetWnd,WM_COPY,0,0);
   // return TRUE;
   //}
   //通过消息方式进行复制代码结束
  }
}
// 传给系统中的下一个钩子
return CallNextHookEx(g_hHook, nCode, wParam, lParam);
}

/********************************************************************/
/* 安装鼠标钩子              */
/* 参数: (无)             */
/* 返回值: TRUE 成功, FALSE 失败         */
/********************************************************************/
BOOL WINAPI StartHook()
{
// 如果已经安装鼠标钩子则返回 FALSE
if (g_hHook != NULL) return FALSE;

// 安装底层鼠标钩子
g_hHook = SetWindowsHookEx(WH_MOUSE, MouseHookProc, g_hInstance, NULL);
if (g_hHook == NULL) return FALSE;
MessageBox(NULL,"启动成功!/n/n复制功能：单击鼠标中键（滚轮）复制数据到剪贴板/n粘贴功能：双击鼠标右键从剪贴板粘贴数据/n复制时自动去除米和平米单位","BOBO鼠标粘贴器1.1",MB_OK);
return TRUE;
}

/********************************************************************/
/* 卸载鼠标钩子              */
/*                 */
/* 参数: (无)             */
/*                 */
/* 返回值: TRUE 成功, FALSE 失败         */
/********************************************************************/
BOOL WINAPI StopHook()
{
// 卸载钩子
if (UnhookWindowsHookEx(g_hHook) == 0) return FALSE;
g_hHook = NULL;
MessageBox(NULL,"卸载成功!","BOBO鼠标粘贴器",MB_OK);
return TRUE;
}

BOOL WINAPI About()
{
MessageBox(NULL,"作者：李博/n功能：快速通过鼠标进行剪贴板操作/n日期：2004.9.25/n邮件：booolee@yahoo.com.cn","关于BOBO鼠标粘贴器 1.1",MB_OK);
return TRUE;
}