大佬求助一个鼠标移动问题

52675969

我知道的是可以通过时钟取鼠标坐标位置，想问问有没有类似于 hook？我只要鼠标动了就监听位置坐标所有的动就输出位置，没动就不输出，有这样的例子吗 大哥们

算法艺术家

bbs.125.la/forum.php?mod=viewthread&tid=13642806&highlight

补充内容 (2025-5-4 20:10):
bbs.125.la/forum.php?mod=viewthread&tid=14730340&highlight

你的猫

  

DLL命令名	返回值类型	公开	备 注
SetWindowsHookExA	整数型
DLL库文件名:
user32.dll
在DLL库中对应命令名:
SetWindowsHookExA
参数名	类 型	传址	数组	备 注
idHook	整数型
lpfn	子程序指针
hmod	整数型
dwThreadId	整数型

DLL命令名	返回值类型	公开	备 注
UnhookWindowsHookEx	整数型
DLL库文件名:
user32.dll
在DLL库中对应命令名:
UnhookWindowsHookEx
参数名	类 型	传址	数组	备 注
hhk	整数型

DLL命令名	返回值类型	公开	备 注
CallNextHookEx	整数型
DLL库文件名:
user32.dll
在DLL库中对应命令名:
CallNextHookEx
参数名	类 型	传址	数组	备 注
hhk	整数型
nCode	整数型
wParam	整数型
lParam	整数型

DLL命令名	返回值类型	公开	备 注
GetModuleHandleA	整数型
DLL库文件名:
kernel32.dll
在DLL库中对应命令名:
GetModuleHandleA
参数名	类 型	传址	数组	备 注
lpModuleName	整数型

常量名称	常量值	公 开	备 注
WH_MOUSE_LL	14
WM_MOUSEMOVE	512

.变量 钩子句柄, 整数型

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

钩子句柄 ＝ SetWindowsHookExA (WH_MOUSE_LL, &鼠标钩子回调, GetModuleHandleA (0), 0)
如果真 (钩子句柄 ＝ 0)
信息框 (“安装鼠标钩子失败！”, 0, , )

子程序名	返回值类型	公开	备 注
__启动窗口_将被销毁

如果真 (钩子句柄 ≠ 0)
UnhookWindowsHookEx (钩子句柄)

子程序名	返回值类型	公开	备 注
鼠标钩子回调	整数型

DLL命令名	返回值类型	公开	备 注
(暂未填写DLL命令名)
DLL库文件名:
(未填写库文件名)
在DLL库中对应命令名:
(未填写命令名)
参数名	类 型	传址	数组	备 注
nCode	整数型
wParam	整数型
lParam	整数型

如果真 (nCode ≥ 0 且 wParam ＝ WM_MOUSEMOVE)
' lParam是MOUSEHOOKSTRUCT结构的指针
' 在易语言中，我们需要手动解析这个结构
坐标X ＝ 取指针整数 (lParam ＋ 0)  ' 结构体偏移0是pt.x
坐标Y ＝ 取指针整数 (lParam ＋ 4)  ' 结构体偏移4是pt.y

输出调试文本 (“鼠标位置：X=” ＋ 到文本 (坐标X) ＋ “, Y=” ＋ 到文本 (坐标Y))

' 传递给下一个钩子
返回 (CallNextHookEx (钩子句柄, nCode, wParam, lParam))

.版本 2<br /> <br /> .DLL命令 SetWindowsHookExA, 整数型, "user32.dll", "SetWindowsHookExA"<br />     .参数 idHook, 整数型<br />     .参数 lpfn, 子程序指针<br />     .参数 hmod, 整数型<br />     .参数 dwThreadId, 整数型<br /> <br /> .DLL命令 UnhookWindowsHookEx, 整数型, "user32.dll", "UnhookWindowsHookEx"<br />     .参数 hhk, 整数型<br /> <br /> .DLL命令 CallNextHookEx, 整数型, "user32.dll", "CallNextHookEx"<br />     .参数 hhk, 整数型<br />     .参数 nCode, 整数型<br />     .参数 wParam, 整数型<br />     .参数 lParam, 整数型<br /> <br /> .DLL命令 GetModuleHandleA, 整数型, "kernel32.dll", "GetModuleHandleA"<br />     .参数 lpModuleName, 整数型<br /> <br /> .常量 WH_MOUSE_LL, "14"<br /> .常量 WM_MOUSEMOVE, "512"<br /> <br /> .变量 钩子句柄, 整数型<br /> <br /> .子程序 __启动窗口_创建完毕<br />     钩子句柄 ＝ SetWindowsHookExA (WH_MOUSE_LL, &鼠标钩子回调, GetModuleHandleA (0), 0)<br />     .如果真 (钩子句柄 ＝ 0)<br />         信息框 (“安装鼠标钩子失败！”, 0, , )<br />     .如果真结束<br /> <br /> .子程序 __启动窗口_将被销毁<br />     .如果真 (钩子句柄 ≠ 0)<br />         UnhookWindowsHookEx (钩子句柄)<br />     .如果真结束<br /> <br /> .子程序 鼠标钩子回调, 整数型<br />     .参数 nCode, 整数型<br />     .参数 wParam, 整数型<br />     .参数 lParam, 整数型<br /> <br />     .如果真 (nCode ≥ 0 且 wParam ＝ WM_MOUSEMOVE)<br />         ' lParam是MOUSEHOOKSTRUCT结构的指针<br />         ' 在易语言中，我们需要手动解析这个结构<br />         坐标X ＝ 取指针整数 (lParam ＋ 0)  ' 结构体偏移0是pt.x<br />         坐标Y ＝ 取指针整数 (lParam ＋ 4)  ' 结构体偏移4是pt.y<br />         <br />         输出调试文本 (“鼠标位置：X=” ＋ 到文本 (坐标X) ＋ “, Y=” ＋ 到文本 (坐标Y))<br />     .如果真结束<br /> <br />     ' 传递给下一个钩子<br />     返回 (CallNextHookEx (钩子句柄, nCode, wParam, lParam))

samll88

https://bbs.125.la/forum.php?mod ... 7%E9%92%A9%E5%AD%90

小苏0826

精易模块搜钩子

cobi

  

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

时钟1.时钟周期 ＝ 1000  ' 设置时钟1秒运行一次

子程序名	返回值类型	公开	备 注
_时钟1_周期事件

变量名	类 型	静态	数组	备 注
坐标	精易_坐标			精易模块

坐标 ＝ 鼠标_取位置 ()  ' 精易模块
调试输出 (“鼠标在屏幕中的坐标位置 x:” ＋ 到文本 (坐标.横) ＋ “,y:” ＋ 到文本 (坐标.纵))
坐标 ＝ 鼠标_取窗口坐标 (取窗口句柄 ())  ' 精易模块
调试输出 (“鼠标在窗口中的坐标位置 x:” ＋ 到文本 (坐标.横) ＋ “,y:” ＋ 到文本 (坐标.纵))

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 时钟1.时钟周期 ＝ 1000  ' 设置时钟1秒运行一次<br /> <br /> .子程序 _时钟1_周期事件<br /> .局部变量 坐标, 精易_坐标, , , 精易模块<br /> <br /> 坐标 ＝ 鼠标_取位置 ()  ' 精易模块<br /> 调试输出 (“鼠标在屏幕中的坐标位置 x:” ＋ 到文本 (坐标.横) ＋ “,y:” ＋ 到文本 (坐标.纵))<br /> 坐标 ＝ 鼠标_取窗口坐标 (取窗口句柄 ())  ' 精易模块<br /> 调试输出 (“鼠标在窗口中的坐标位置 x:” ＋ 到文本 (坐标.横) ＋ “,y:” ＋ 到文本 (坐标.纵))

补充内容 (2025-5-5 05:07):
鼠标_监视_安装 ()
鼠标_监视_卸载 ()
这两个都是 精易模块的，当然精易模块内对于鼠标事件也有很多子程序，你可以选择测试一下。