服务器之家

服务器之家 > 正文

易语言制作QQ聊天添加自定义小尾巴工具

时间:2022-02-23 15:27     来源/作者:易语言源码教程

DLL命令表

?
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
.版本 2
.DLL命令 SetWindowsHookEx, 整数型, , "SetWindowsHookExA", , 建立钩子
  .参数 idHook, 整数型
  .参数 lpfn, 子程序指针
  .参数 hmod, 整数型
  .参数 dwThreadId, 整数型
.DLL命令 CopyMemory, , , "RtlMoveMemory"
  .参数 Destination, 按键信息, 传址
  .参数 Source, 整数型
  .参数 Length, 整数型
.DLL命令 CallNextHookEx, 整数型, , "CallNextHookEx"
  .参数 hhk, 整数型
  .参数 nCode, 整数型
  .参数 wParam, 整数型
  .参数 lParam, 整数型
.DLL命令 GetModuleHandle, 整数型, , "GetModuleHandleA"
  .参数 lpModuleName, 整数型
.DLL命令 UnHookWindowsHookEx, 逻辑型, , "UnhookWindowsHookEx", , 卸载钩子
  .参数 hhk, 整数型

自定义数据类型表

?
1
2
3
4
5
6
7
.版本 2
.数据类型 按键信息
  .成员 message, 整数型
  .成员 paramL, 整数型
  .成员 paramH, 整数型
  .成员 time, 整数型
  .成员 hwnd, 整数型

QQ聊天添加自定义小尾巴

此功能需要加载精易模块5.6

?
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
.版本 2
.支持库 eAPI
.程序集 窗口程序集_启动窗口
.程序集变量 钩子句柄, 整数型
.子程序 __启动窗口_创建完毕
.如果真 (钩子句柄 = 0)
  钩子句柄 = SetWindowsHookEx (13, &钩子函数, GetModuleHandle (0), 0)
  .如果真 (钩子句柄 = 0)
    输出调试文本 (“安装钩子失败!”)
    返回 ()
  .如果真结束
.如果真结束
.子程序 钩子函数, 整数型
.参数 icode, 整数型
.参数 wparam, 整数型
.参数 lparam, 整数型
.局部变量 按键信息, 按键信息
.局部变量 局部, 整数型, 静态
CopyMemory (按键信息, lparam, 28)
.如果 (按键信息.message = #回车键) ' 判断按下的是否回车键。
  .如果真 (局部 ÷ 2 = 局部 \ 2) ' 如果不加这个判断,每次都会投递2次文本,因为按下和弹起算2次
    文本_投递 (取鼠标所在窗口句柄 (), 尾巴内容编辑框.内容)
  .如果真结束
  局部 = 局部 + 1
.否则
.如果结束
返回 (CallNextHookEx (钩子句柄, icode, wparam, lparam))
.子程序 __启动窗口_将被销毁
UnHookWindowsHookEx (钩子句柄)

运行结果:

易语言制作QQ聊天添加自定义小尾巴工具

总结

以上就是这篇文章的全部内容了,希望本文的内容对大家的学习或者工作具有一定的参考学习价值,谢谢大家对服务器之家的支持。如果你想了解更多相关内容请查看下面相关链接

相关文章

热门资讯

蜘蛛侠3英雄无归3正片免费播放 蜘蛛侠3在线观看免费高清完整
蜘蛛侠3英雄无归3正片免费播放 蜘蛛侠3在线观看免费高清完整 2021-08-24
2022年最旺的微信头像大全 微信头像2022年最新版图片
2022年最旺的微信头像大全 微信头像2022年最新版图片 2022-01-10
背刺什么意思 网络词语背刺是什么梗
背刺什么意思 网络词语背刺是什么梗 2020-05-22
yue是什么意思 网络流行语yue了是什么梗
yue是什么意思 网络流行语yue了是什么梗 2020-10-11
2020微信伤感网名听哭了 让对方看到心疼的伤感网名大全
2020微信伤感网名听哭了 让对方看到心疼的伤感网名大全 2019-12-26
返回顶部