- 注释:****************************************************
- 注释:代码作者:狂奔De蜗牛
- 注释:编写时间:2010-08-22
- 注释:脚本说明:立用了窗口激活和显示及窗口句柄插件,轻松实现窗口多开,理论上可以支持无限多个,建议在10个以内。
- 注释:****************************************************
- 弹出窗口 "脚本马上开始,请根据以下提示进行操作。"
- 定义变量 Win, Windows, Hwnd
- 令 Win = 0
- 令 Windows = ""
- 标记 窗口查找
- 令 Win = Win + 1
- 延时 200 毫秒
- 弹出窗口 "请将选中第 " & Win & " 个游戏窗口,确定后选中该窗口,再按任意键继续,如不想继续请在确定后按“Q”。"
- 延时 200 毫秒
- 令 AnJian = (键盘)等待按任意键
- 延时 200 毫秒
- 如果 Int(AnJian) <> 81 则
- 令 Hwnd = Window.Foreground()
- 如果 Win > 1 则
- 令 Windows = Windows & "||" & Hwnd
- 否则
- 令 Windows = Hwnd
- 条件结束
- 跳转到标记 窗口查找
- 条件结束
- 定义变量 WinName, i
- 令 WinName = Split(Windows,"||")
- 弹出窗口 "窗口选定完必,您一共选定了 " & Ubound(WinName) + 1 & " 个窗口。"
- 标记 循环选择窗口
- 循环 i 从 0 到 Ubound(WinName)
- 调用 Window.Active(WinName(i))
- 调用 Window.Show(WinName(i))
- 延时 3000 毫秒
- 循环结束
- 跳转到标记 循环选择窗口