| 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 |
|
|---|
