au3多窗口实例

au3多窗口 实例

1. #include <GUIConstants.au3>
   
2. Opt("GUIOneventMode",1)
   
3. Dim $Button[6]
   
4. 
   
5. $WinMain = GUICreate("主窗口", 450, 300) ;创建主窗口
   
6. GUISetOnEvent($GUI_EVENT_CLOSE, "_Exit") ;注册窗口关闭事件到函数_Exit
   
7. $Button[0] = GUICtrlCreateButton("显示子窗口 1", 0, 0, 113, 49)
   
8. $Button[1] = GUICtrlCreateButton("显示子窗口 2", 216, 0, 105, 49)
   
9. 
   
10. $WinSub1 = GUICreate("子窗口", 220, 60) ;创建子窗口1
    
11. GUISetOnEvent($GUI_EVENT_CLOSE, "GUICtrlMsg") ;注册窗口关闭事件到函数GUICtrlMsg
    
12. $Button[2] = GUICtrlCreateButton("确认", 0, 0, 100, 50)
    
13. $Button[3] = GUICtrlCreateButton("取消", 110, 0, 100, 50);创建子窗口中按钮二
    
14. 
    
15. $WinSub2 = GUICreate("子窗口", 220, 60) ;创建子窗口2
    
16. GUISetOnEvent($GUI_EVENT_CLOSE, "GUICtrlMsg") ;注册窗口关闭事件到函数GUICtrlMsg
    
17. $Button[4] = GUICtrlCreateButton("确认", 0, 0, 100, 50)
    
18. $Button[5] = GUICtrlCreateButton("取消", 110, 0, 100, 50);创建子窗口中按钮二
    
19. 
    
20. For $I = 5 To 0 Step -1
    
21. GUICtrlSetOnEvent($Button[$I],"GUICtrlMsg") ;注册总共的六个按钮点击事件到函数 GUICtrlMsg
    
22. ;请区分 GUISetOnEvent 和 GUICtrlSetOnEvent的区别
    
23. Next
    
24. 
    
25. GUISwitch($WinMain) ;切换当前窗口到主窗口
    
26. GUISetState(@SW_SHOW) ;显示当前窗口
    
27. 
    
28. While 1
    
29. Sleep(1000)
    
30. WEnd
    
31. 
    
32. Func GUICtrlMsg()
    
33. Switch @GUI_CtrlId;选择事件 ID 或 控件 ID
    
34. Case $GUI_EVENT_CLOSE;如果点下的是$GUI_EVENT_CLOSE(关闭)
    
35. GUISetState(@SW_HIDE,@GUI_WinHandle); 隐藏产生事件的窗口
    
36. Case $Button[0]
    
37. GUISetState(@SW_SHOW,$WinSub1); 显示 子窗口 1
    
38. Case $Button[1]
    
39. GUISetState(@SW_SHOW,$WinSub2); 显示 子窗口 2
    
40. Case $Button[2]
    
41. MsgBox(48,0,"你点了子窗口 1 中的第一个按钮")
    
42. Case $Button[3]
    
43. GUISetState(@SW_HIDE,$WinSub1); 隐藏 子窗口 1
    
44. Case $Button[4]
    
45. MsgBox(48,0,"你点了主窗口 2 中的第一个按钮")
    
46. Case $Button[5]
    
47. GUISetState(@SW_HIDE,$WinSub2); 隐藏 子窗口 2
    
48. EndSwitch
    
49. EndFunc
    
50. 
    
51. Func _Exit()
    
52. Exit
    
53. EndFunc

复制代码

学习学习了