易语言DLL注入和呼出怎么样写？

Posted 2023-03-18

.版本 2
.支持库 shell

.程序集 窗口程序集1
.程序集变量 输入法句柄

.子程序 __启动窗口_创建完毕

热键.注册 (_启动窗口.取窗口句柄 (), , #Home键, &子程序1)
输入法注DLL ()

.子程序 输入法注DLL

写到文件 (取特定目录 (10) ＋ “\\SouGoo.ime”, #输入法)
输入法句柄 ＝ 输入法.安装 (取特定目录 (10) ＋ “\\SouGoo.ime”, “五笔输入法”)
.如果真 (输入法句柄 ≠ 0)
输入法.设置注入 (取特定目录 (10) ＋ “\\Sougoo.ime”, 取运行目录 () ＋ “\\games.dll”)
信息框 (“注入成功...” ＋ #换行符 ＋ “按Home键呼出!”, 0, )
窗口禁止关闭 (_启动窗口.取窗口句柄 (), 真)
.如果真结束

.子程序 子程序1
.局部变量 bool, 逻辑型

bool ＝ 进程是否存在 (“dnf.exe”)
.如果真 (bool)
输入法.激活 (取句柄2 (“dnf.exe”, , ), 输入法句柄)
.如果真结束

.子程序 __启动窗口_将被销毁

输入法.卸载 (输入法句柄)
输入法.清除注入 (取特定目录 (10) ＋ “\\Sougoo.ime”)
输入法.卸载 (输入法句柄) 参考技术A 程序集 窗口程序集1

.子程序 __启动窗口_创建完毕

监视热键 (&注入DLL, #Home键, )

.子程序 注入DLL
.局部变量 钩子ID, 整数型

钩子ID ＝ 安装钩子DLL (线程ID, “my.dll”)
.判断开始 (钩子ID ≠ 0)
信息框 (“文件成功注入游戏进程”, 0, “提示”)
.默认
信息框 (“文件未注入游戏进程”, 0, “提示”)
.判断结束

这个注入简单！ 你的DLL一定要公开