| 1 | #include <GUIConstantsEx.au3> |
|---|
| 2 | #include <WindowsConstants.au3> |
|---|
| 3 | |
|---|
| 4 | ;_DebugBugReportEnv()=AutoIt:3.3.2.0 (Os:WIN_XP/X86/Service Pack 3 Language:0410 Keyboard:00000410 Cpu:X64) |
|---|
| 5 | |
|---|
| 6 | $hGUI = GUICreate("Bug tester", 300, 200) |
|---|
| 7 | |
|---|
| 8 | $nButton = GUICtrlCreateButton("Bug", 90, 50, 120, 30) |
|---|
| 9 | |
|---|
| 10 | GUIRegisterMsg($WM_COMMAND, "MY_WM_COMMAND") |
|---|
| 11 | GUISetState() |
|---|
| 12 | While 1 |
|---|
| 13 | $GUIMsg = GUIGetMsg() |
|---|
| 14 | |
|---|
| 15 | If $GUI_EVENT_CLOSE = $GUIMsg Then ExitLoop |
|---|
| 16 | WEnd |
|---|
| 17 | Func MY_WM_COMMAND($hWnd, $Msg, $wParam, $lParam) |
|---|
| 18 | If ($lParam = GUICtrlGetHandle($nButton)) Then GUIDelete($hWnd) |
|---|
| 19 | Return $GUI_RUNDEFMSG |
|---|
| 20 | EndFunc ;==>MY_WM_COMMAND |
|---|
| 21 | |
|---|
| 22 | |
|---|
