大漠插件模块后台测试工具

易语言 2020-07-17 18:21:14

大漠插件模块后台测试工具

注册目录 = 取运行目录 () + “\”
写到文件 (注册目录 + “dm.dll”, #大漠DLL)
写到文件 (注册目录 + “RegDll.dll”, #大漠文件)
运行 (“regsvr32 ” + 注册目录 + “dm.dll -s”, 真, )

.如果 (按钮_绑定.标题 = “绑定”)
.如果 (大漠.后台_绑定窗口 (到整数 (编辑框_句柄.内容), 组合框_图色.内容, 组合框_鼠标.内容, 组合框_键盘.内容, 0) = 1)
信息框 (“绑定成功”, 0, )
按钮_绑定.标题 = “解除绑定”
.否则
信息框 (“绑定失败”, 0, )
.如果结束

.否则
大漠.后台_解除绑定窗口 ()
按钮_绑定.标题 = “绑定”