|
发表于 2023-1-8 10:47:34
|
显示全部楼层
.版本 2
.子程序 模拟器启动
.参数 i, 整数型
.局部变量 雷电模拟器数量, 整数型
线程_初始化COM库 ()
全局大漠.ExecuteCmd (“dnconsole.exe launch --index ” + 到文本 (i), 编辑框_客户端地址.内容, 1000)
.版本 2
.支持库 spec
.支持库 iext
.子程序 模拟器绑定
.参数 i, 整数型
.局部变量 局大漠, dm_soft
.局部变量 窗口绑定值, 整数型
.局部变量 窗口句柄, 整数型
.局部变量 窗口是否启动, 逻辑型
线程_初始化COM库 ()
局大漠 = 线程信息 [i].dm
局大漠.创建 ()
窗口句柄 = 局大漠.FindWindow (“LDPlayerMainFrame”, “雷电模拟器” + “-” + 到文本 (i))
调试输出 (“窗口句柄”, 窗口句柄)
窗口是否启动 = 窗口_是否未响应 (窗口句柄)
.判断循环首 (窗口是否启动 = 真)
窗口句柄 = 局大漠.FindWindow (“LDPlayerMainFrame”, “雷电模拟器” + “-” + 到文本 (i))
窗口是否启动 = 窗口_是否未响应 (窗口句柄)
.判断循环尾 ()
调试输出 (“窗口句柄”, 窗口句柄)
线程信息 [i].窗口句柄 = 窗口句柄
调试输出 (“线程信息” + 到文本 (i) + “.窗口句柄”, 线程信息 [i].窗口句柄)
窗口绑定值 = 局大漠.BindWindowEx (线程信息 [i].窗口句柄, “dx.graphic.opengl”, “windows3”, “windows”, “”, 0)
全局大漠.SetWindowState (线程信息 [i].窗口句柄, 3)
超级列表框_中控.置标题 (i - 1, 4, 到文本 (线程信息 [i].窗口句柄))
.判断开始 (窗口绑定值 > 0)
超级列表框_中控.置标题 (i - 1, 5, “绑定成功”)
.默认
超级列表框_中控.置标题 (i - 1, 5, “绑定失败”)
|
|