求助，au3脚本写代码时如何调用运行qq.exe的同时最小化运行

2011ziyouren

au3脚本写代码时如何调用运行qq.exe的同时最小化运行qq.exe，不让看到窗口，关闭脚本同时关闭qq.exe
谢谢！

xulinghai

不知道这样行不：

1. #include <GUIConstantsEx.au3>
   
2. 
   
3. Opt("MustDeclareVars", 1)
   
4. Opt("GUIOnEventMode", 1)
   
5. 
   
6. Global $Main = GUICreate("运行QQ", 400, 100, -1, -1)
   
7. Global $Btn1 = GUICtrlCreateButton("运行", 120, 40, 72, 24)
   
8. Global $Btn2 = GUICtrlCreateButton("退出", 220, 40, 72, 24)
   
9. 
   
10. GUISetOnEvent($GUI_EVENT_CLOSE, "GUICtrlMsg")
    
11. GUICtrlSetOnEvent($Btn1, "GUICtrlMsg")
    
12. GUICtrlSetOnEvent($Btn2, "GUICtrlMsg")
    
13. 
    
14. GUISetState(@SW_SHOW)
    
15. 
    
16. While 1
    
17.         Sleep(1000)
    
18. WEnd
    
19. 
    
20. Func GUICtrlMsg()
    
21.         Switch @GUI_CtrlId
    
22.                 Case $GUI_EVENT_CLOSE
    
23.                         _Quit()
    
24.                 Case $Btn1
    
25.                         _RunQQ()
    
26.                 Case $Btn2
    
27.                         _Quit()
    
28.         EndSwitch
    
29. EndFunc   ;==>GUICtrlMsg
    
30. 
    
31. Func _RunQQ()
    
32.         If FileExists(@ScriptDir & "\qq.exe") Then
    
33.                 Run(@ScriptDir & "\qq.exe", "", @SW_MINIMIZE)
    
34.         Else
    
35.                 MsgBox(64, "提示", "程序目录未发现qq.exe文件.     ")
    
36.         EndIf
    
37. EndFunc   ;==>_RunQQ
    
38. 
    
39. Func _Quit()
    
40.         If ProcessExists("qq.exe") Then ProcessClose("qq.exe")
    
41.         GUIDelete($Main)
    
42.         Exit
    
43. EndFunc   ;==>_Quit

复制代码

2011ziyouren

谢谢大哥！帮了我的帮大忙。

2011ziyouren

大哥：我要把运行按钮取消直接运行qq.exe，代码怎么改谢谢！

2011ziyouren

谢谢xulinghai大哥的代码让我学习了很多，我原本是想这样运行。
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("运行QQ", 265, 265, -1, -1)
$Button1 = GUICtrlCreateButton("退出", 80, 96, 105, 65)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

Run(@ScriptDir &"\qq.exe","",@SW_MINIMIZE)
While 1
        $nMsg = GUIGetMsg()
       
        Switch $nMsg
               
                Case $GUI_EVENT_CLOSE, $Form1
                       
                        _Quit()
                       
                Case $Button1
                       
                        _Quit()
                       
                        Exit

        EndSwitch
WEnd
Func _Quit()

        If ProcessExists("qq.exe") Then ProcessClose("qq.exe")

        GUIDelete($Form1)

        Exit

EndFunc   ;==>_Quit