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

时间:2021-05-19

DLL命令表

.版本 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, 整数型

自定义数据类型表

.版本 2.数据类型 按键信息 .成员 message, 整数型 .成员 paramL, 整数型 .成员 paramH, 整数型 .成员 time, 整数型 .成员 hwnd, 整数型

QQ聊天添加自定义小尾巴

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

.版本 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 (钩子句柄)

运行结果:

总结

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

声明:本页内容来源网络,仅供用户参考;我单位不保证亦不表示资料全面及准确无误,也不保证亦不表示这些资料为最新信息,如因任何原因,本网内容或者用户因倚赖本网内容造成任何损失或损害,我单位将不会负任何法律责任。如涉及版权问题,请提交至online#300.cn邮箱联系删除。

相关文章