【已解决】如何隐藏主窗口和弹出的子窗口并完成工作？
本帖最后由 chishingchan 于 2022-6-10 07:57 编辑注册机：
运行环境：Windows 7
我的脚本运行效果：
我的脚本：
#RequireAdmin
If FileExists(@ScriptDir & "\signtool.exe") Then
If FileExists(@ScriptDir & "\keygen.exe") Then
Local $iPID = Run(@ScriptDir & "\keygen.exe", @ScriptDir, @SW_HIDE)
ProcessWait($iPID)
ControlClick("注册机", "获取序列号", "TButton2", "left")
ControlClick("注册机", "生成密钥文件", "TButton1", "left")
WinWait("信息","确定")
WinClose("信息","确定")
ProcessClose($iPID)
EndIf
EndIf
备注：
此注册机按 生成密钥文件 按钮后弹出子窗口，也必须回应此子窗口才能生成 vbsedit_1.lic。
提问：
如何使之 完全隐藏运行 并生成 vbsedit_1.lic？谢谢！
上面代码中，在第5行下面添加一行，并不能完成工作！脚本暂停了！
WinSetState("注册机", "获取序列号", @SW_HIDE) 本帖最后由 itzyx 于 2022-6-8 00:09 编辑
chishingchan 发表于 2022-6-7 17:53
上面代码中，在第5行下面添加一行，并不能完成工作！脚本暂停了！
那是因为文本隐藏了，没办法识别，可以前面添加个
Opt('WinDetectHiddenText', 1)
但是试了一下，用Winwait的话，主窗口还是会一闪而过，没办法完全隐藏。
最简单的搞法 SplashTextOn 遮住就完事了~ afan 发表于 2022-6-9 17:28
最简单的搞法 SplashTextOn 遮住就完事了~
求完整例子，谢谢！ 本帖最后由 afan 于 2022-6-9 19:10 编辑
chishingchan 发表于 2022-6-9 18:55
求完整例子，谢谢！
#RequireAdmin
If FileExists(@ScriptDir & "\signtool.exe") Then
If FileExists(@ScriptDir & "\keygen.exe") Then
SplashTextOn("", "正在生成密钥文件" & @LF & "请稍候……", 700, 300, -1, -1, 1 + 32, "", 20)
Local $iPID = Run(@ScriptDir & "\keygen.exe")
ProcessWait($iPID)
ControlClick("注册机", "获取序列号", "TButton2", "left")
ControlClick("注册机", "生成密钥文件", "TButton1", "left")
WinWait("信息", "确定")
WinClose("信息", "确定")
ProcessClose($iPID)
Sleep(50)
SplashOff()
EndIf
EndIf
要隐藏之，至少需要Hook其窗口创建过程并进行干预，估计比较麻烦。
而你需要的，应该仅仅只是不想使其显示，影响体验，那么只需用拥有顶层属性的窗口遮挡即可。
简单粗暴~:face (24):
页:
[1]