【已解决】如何隐藏主窗口和弹出的子窗口并完成工作？

chishingchan

注册机：


运行环境：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？谢谢！

chishingchan

上面代码中，在第5行下面添加一行，并不能完成工作！脚本暂停了！

WinSetState("注册机", "获取序列号", @SW_HIDE)

itzyx

chishingchan 发表于 2022-6-7 17:53
上面代码中，在第5行下面添加一行，并不能完成工作！脚本暂停了！

那是因为文本隐藏了，没办法识别，可以前面添加个
Opt('WinDetectHiddenText', 1)
但是试了一下，用Winwait的话，主窗口还是会一闪而过，没办法完全隐藏。

afan

最简单的搞法 SplashTextOn 遮住就完事了~

chishingchan

afan 发表于 2022-6-9 17:28
最简单的搞法 SplashTextOn 遮住就完事了~

求完整例子，谢谢！

afan

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其窗口创建过程并进行干预，估计比较麻烦。
而你需要的，应该仅仅只是不想使其显示，影响体验，那么只需用拥有顶层属性的窗口遮挡即可。
简单粗暴~