这个是别人写的,但我想改下,隐藏所有安装界面和提示,怎么改呢
Opt("MouseCoordMode", 1)
run("TTPlayer_5.1.0_YlmF.exe")
WinWait("安装 - 千千静听","欢迎使用 千千静听 安装向导")
ControlClick("安装 - 千千静听","下一步(&N) >","TButton2")
WinWait("安装 - 千千静听","许可协议")
ControlClick("安装 - 千千静听","下一步(&N) >","TButton3")
WinWait("安装 - 千千静听","信息")
ControlClick("安装 - 千千静听","下一步(&N) >","TButton3")
WinWait("安装 - 千千静听","选择目标位置")
ControlClick("安装 - 千千静听","下一步(&N) >","TButton4")
WinWait("安装 - 千千静听","选择组件")
ControlClick("安装 - 千千静听","下一步(&N) >","TButton4")
WinWait("安装 - 千千静听","选择开始菜单文件夹")
ControlClick("安装 - 千千静听","下一步(&N) >","TButton5")
WinWait("安装 - 千千静听","选择附加任务")
ControlClick("安装 - 千千静听","下一步(&N) >","TButton5")
WinWait("安装 - 千千静听","准备安装")
Send("{enter}")
WinWait("千千静听 - 选项","关联音频文件以及创建快捷方式")
WinActivate("千千静听 - 选项","关联音频文件以及创建快捷方式")
MouseClick("left", 758, 29, 1)
MouseClick("left", 628, 30, 1)
MouseClick("left", 546, 35, 1)
WinWait("安装 - 千千静听","信息")
ControlClick("安装 - 千千静听","下一步(&N) >","TButton5")
WinWait("安装 - 千千静听","千千静听 安装向导完成")
Send("{TAB}{SPACE}")
ControlClick("安装 - 千千静听","完成(&F)","TButton5") |