[API相关] 易语言【全局】【键盘、鼠标钩子(HOOK)】教程【纯API不用模块!】 |
您所在的位置:网站首页 › 易语言窗口句柄优点 › [API相关] 易语言【全局】【键盘、鼠标钩子(HOOK)】教程【纯API不用模块!】 |
版本 2 .DLL命令 GetModuleHandle, 整数型, , “GetModuleHandleA”, , 获取句柄 .参数 lpModuleName, 整数型 .DLL命令 CallNextHookEx, 整数型, , “CallNextHookEx”, , 下一个钩子 .参数 hhk, 整数型 .参数 nCode, 整数型 .参数 wParam, 整数型 .参数 lParam, 整数型 .DLL命令 SetWindowsHookEx, 整数型, , “SetWindowsHookExA”, , 创建钩子 .参数 idHook, 整数型 .参数 lpfn, 子程序指针 .参数 hmod, 整数型 .参数 dwThreadId, 整数型 .DLL命令 UnHookWindowsHookEx, 逻辑型, , “UnhookWindowsHookEx”, , 卸载钩子 .参数 hhk, 整数型 .DLL命令 WindowFromPoint, 整数型, “user32″, “WindowFromPoint”, , 返回包含了指定点的窗口的句柄。忽略屏蔽、隐藏以及透明窗口 包含了指定点的窗口的句柄。如指定的点处没有窗口存在,则返回零 .参数 xPoint, 整数型, , x点值 .参数 yPoint, 整数型, , y点值; .DLL命令 CopyMemory, , , “RtlMoveMemory”, , 拷贝内存 .参数 Destination, MOUSEHOOKSTRUCT, 传址 .参数 Source, 整数型 .参数 Length, 整数型 GetModuleHandle()是获取一个应用程序或动态链接库的模块句柄。。不要想太多… 第二个是呼叫下一个钩子。 第三个是创建钩子 4:卸载钩子 5:返回坐标处的窗口句柄 6:拷贝内存 然后新建一个自定义数据类型。等下用的。 .版本 2 .数据类型 MOUSEHOOKSTRUCT .成员 pt, POINT .成员 hwnd, 整数型 .成员 wHitTestCode, 整数型 .成员 dwExtraInfo, 整数型 .数据类型 POINT .成员 X, 整数型 .成员 Y, 整数型 然后可以开始写代码了。。。创建2个程序集变量。用来保存键盘钩子和鼠标钩子的代号的
。 然后创建2个回调函数。鼠标钩子和键盘钩子的回调函数。返回值都是 整数型。都有三个参数。
。接下来可以写_启动窗口_创建完毕()的代码了。 要创建2个钩子一个键盘钩子。一个鼠标钩子。首先介绍一下创建钩子的命令。
第一个参数是钩子类型。全局鼠标是14.键盘是13.第二个是子程序指针。。也就是提供刚才我们创建的那两个函数的指针。&是求指针符号。 第三是句柄。填GetModuleHandle(0)就行。第四个填0. 这是图。 然后开始弄回调函数。。先弄键盘钩子的。键盘钩子函数的第二个参数是状态。256按下。257弹起。参数三是键值的指针。注意。。只是指针。我们要把它换成键值。首先新建一个局部变量整数型的键值。然后需要这两个命令。 取字节集数据 (, , ) 指针到字节集 (, ) 首先是指针到字节集 (, ) 第一个参数是指针。填 参数三。 第二个填1。因为键值是一个整数。在字节集里占1位。 然后取字节集数据 第一个参数就是 指针到字节集 (参数三,1 ) 我们要取整数型的键值所以第二个参数填3.第三个不填 OK。这样键代码就被我们取出来了有了键值可以好好玩玩了 。
比如。。.
ok写完了代码。。不过别忘记。这个函数可是有返回值的。。返回什么呢?这么写
也就是呼叫下一个钩子。。 ok键盘弄完。弄弄鼠标的。同样。参数三里面有鼠标的坐标。参数二是类型。我只记得512是鼠标移动。513是左单击。具体你们可以调试输出一下参数二。然后看看参数值就懂了。首先我们要把鼠标的坐标取到吧? 现在就来取。 首先新建一个MOUSEHOOKSTRUCT类型的鼠标变量。。。这回自定义数据类型用上了。
然后开始写代码。这回就需要用上 CopyMemory()这个API了。拷贝内存用的 第一个参数填鼠标。。也就是我们刚才创的变量。第二个要填参数三。第三个填20. 然后坐标数据就在变量里了。 横坐标 在 鼠标.pt.x中 纵坐标在鼠标.pt.x。 知道了坐标。这下又可以好好玩玩了。
。这样鼠标一移动就调试输出坐标。 好啦。还是要 调用下一个钩子。
..然后还没完。。。不卸载钩子…可不行。
结束~好好玩玩吧………… |
今日新闻 |
点击排行 |
|
推荐新闻 |
图片新闻 |
|
专题文章 |
CopyRight 2018-2019 实验室设备网 版权所有 win10的实时保护怎么永久关闭 |