求帮忙看一个 窗口无法关闭 问题

lemory

代码如下，创建的窗口无法关闭，请问是什么原因呢

#include <WindowsConstants.au3>
#include <GUIConstantsEx.au3>
#Global Const $GUI_EVENT_CLOSE  = -3     ; 窗口关闭消息的值
Global Const $WM_ENTERSIZEMOVE = 0x0231 ; 窗口移动消息的值
Global Const $WM_EXITSIZEMOVE  = 0x0232 ; 窗口结束移动消息的值

Opt ( "GUIOnEventMode" , 1 )            ; 开启 Event 模式

;主窗口
$Gui = GUICreate ( "Lefty", 400, 300, 550, 200 ) ; 创建一个居中显示的 GUI 窗口
$btn = GUICtrlCreateButton ("开始测试 ", 250,130,90,40)   
GUISetState ( @SW_SHOW )   

While 1 ; 死循环,保证脚本不会退出
        Switch GUIGetMsg() ; 根据宏 @GUI_CtrlId 来判断消息
                Case $GUI_EVENT_CLOSE
                        Exit
                Case $btn
        EndSwitch

lemory

自己顶一个

afan

注释掉这一行
;Opt ( "GUIOnEventMode" , 1 )            ; 开启 Event 模式

lemory

回复 3# afan
老大，如果程序里需要顺序开多个窗口，开窗口1时希望用event模式，开窗口2
希望不用event模式，请问该怎么做呢

lemory

回复 3# afan
老大，如果程序里需要顺序开多个窗口，开窗口1时希望用event模式，开窗口2
希望不用event模式，请问该怎么做呢

afan

回复 5# lemory


    需要时用 Opt ( "GUIOnEventMode" , X ) 切换

不死帝国

发送WM_SYSCOMMAND消息试试

Func WM_SYSCOMMAND($hWnd, $sMsg, $sWParam, $slParam)
        Switch $sWParam
                Case 61536  ;$SC_CLOSE
                        Exit
        EndSwitch
EndFunc