(已解决)下拉菜单的问题

xargw

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 623, 449, 192, 114)
$MenuItem1 = GUICtrlCreateMenu("程序")
$MenuItem2 = GUICtrlCreateMenuItem("关于", $MenuItem1)
$MenuItem3 = GUICtrlCreateMenuItem("帮助", $MenuItem1)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case $GUI_EVENT_CLOSE
                        Exit

        EndSwitch
WEnd
我想让这个程序实现，点关于和帮助的关闭，不会整个程序关闭，要关于关闭，只会点关于关闭，然后回到主界面，而不是整个程序关闭

水木子

没明白楼主的意思，能说得简单点吗？

republican

回复 1# xargw

用事件模式会好很多。

循环模式的话，用GUIGetMsg(1)，再判断窗体信息。

xargw

没明白楼主的意思，能说得简单点吗？
水木子 发表于 2010-8-9 18:42

我上面的，不是有关于和帮助啊，我点关于一个对话框出来，然后我点关闭，他会把整个程序关闭，而不是只把关于的对话框关于回到主程序界面

水木子

是父子窗口吗？

#include <GUIConstantsex.au3>
$Form1 = GUICreate('父窗口', 250, 250)
$Button1 = GUICtrlCreateButton('创建“子窗体”', 75, 100, 100, 30, 0)
GUISetState() ;调整窗口的状态.

While 1
        Switch GUIGetMsg()
                Case $GUI_EVENT_CLOSE
                        Exit
                Case $Button1
                        GUISetState(@SW_DISABLE, $Form1) ;禁用父窗口
                        $Form2 = GUICreate('子窗口', 200, 200) ;创建子窗口
                        $Button2 = GUICtrlCreateButton("关闭\退出", 50, 80, 100, 30, 0) ;创建“退出”按钮
                        GUISetState() ;调整窗口的状态.
                        While 1
                                Switch GUIGetMsg()
                                        Case $GUI_EVENT_CLOSE
                                                GUISetState(@SW_ENABLE, $Form1) ;启用父窗口
                                                GUIDelete($Form2) ;删除指定窗口和它包含的所有控件.
                                                ExitLoop ;终止一个 While/Do/For 循环.
                                        Case $Button2
                                                GUISetState(@SW_ENABLE, $Form1) ;启用父窗口
                                                GUIDelete($Form2) ;;删除指定窗口和它包含的所有控件.
                                                ExitLoop ;终止一个 While/Do/For 循环.
                                EndSwitch
                        WEnd
        EndSwitch
WEnd

xargw

谢谢，我试一下

qq82015930

路过，看看

hollandmfq

雷锋精神传天下！