如何从循环中跳出？-『提问交流』-AUTOIT CN

pdp320921 发表于 2011-9-8 20:37:43

如何从循环中跳出？

#include <GUIConstantsEx.au3>

$main=GUICreate("main",600,400,-1,-1)
$text =GUICtrlCreateLabel("hello,world",0,200)
GUISetState(@SW_SHOW) ;
   While 1

   $msg = GUIGetMsg()
For $i=0 To 600 Step 20
Sleep(500)
ControlMove( $main,"",3,$i,200)
;ExitLoop
   If $msg = $GUI_EVENT_CLOSE Then ExitLoop
Next
   If $msg = $GUI_EVENT_CLOSE Then ExitLoop
WEnd
上述代码如何能实现关闭窗口？
好像循环中出不来了,求指点

happytc 发表于 2011-9-8 20:48:09

回复 1# pdp320921

别用两层循环，只用一个就够了，你的是在第二重循环里出不来了。因为没有机会回到第一循环里给$msg赋新值，所以你在for循环里的If $msg = $GUI_EVENT_CLOSE Then ExitLoop根本没有用。

pdp320921 发表于 2011-9-8 20:55:45

感谢回复，道理我懂，可如何只用修改呢？

happytc 发表于 2011-9-8 20:59:49

本帖最后由 happytc 于 2011-9-8 21:02 编辑

回复 3# pdp320921

其实象这种要在死循环里跳出来，最好用一些au3提供的中断函数来做。

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

$main = GUICreate("main", 600, 400, -1, -1)
$text = GUICtrlCreateLabel("hello,world", 0, 200)
GUIRegisterMsg($WM_SYSCOMMAND, "WM_SYSCOMMAND")
GUISetState(@SW_SHOW) ;
_HelloWorld()

Func _HelloWorld()
For $i = 0 To 600 Step 20
Sleep(500)
ControlMove($main, "", 3, $i, 200)
Next
EndFunc

Func WM_SYSCOMMAND($hWnd, $Msg, $wParam, $lParam)
Local Const $SC_CLOSE = 0xF060

If $hWnd == $main Then
Switch BitAND($wParam, 0xFFF0)
Case $SC_CLOSE
Exit
EndSwitch
EndIf

Return $GUI_RUNDEFMSG
EndFunc

xms77 发表于 2011-9-8 21:05:42

#include <GUIConstantsEx.au3>

$main=GUICreate("main",600,400,-1,-1)

$text =GUICtrlCreateLabel("hello,world",0,200)

GUISetState(@SW_SHOW) ;
$i = 0
$flag = 1
   While 1



   $msg = GUIGetMsg()
If $msg = $GUI_EVENT_CLOSE Then ExitLoop
            If $flag = 1 Then

                  sleep(500)

                  ControlMove( $main,"",3,$i,200)

                  $i = $i + 20
If $i > 600 Then $flag = 0
EndIf


WEnd一个循环了，怎么还是出不来啊？郁闷{:face (394):}

xms77 发表于 2011-9-8 21:08:37

本帖最后由 xms77 于 2011-9-8 21:10 编辑

回复 4# happytc
果然是高人啊，我用了一个循环还是不能及时出来啊！看了你的中断函数，没有明白什么意思，不懂，呵呵！

happytc 发表于 2011-9-8 21:16:05

回复 5# xms77

其实你这个是可以跳出来的，只是不灵敏而已，原因就是sleep(500)了，可以改一下为下面的：

#include <GUIConstantsEx.au3>

$main = GUICreate("main", 600, 400, -1, -1)
$text = GUICtrlCreateLabel("hello,world", 0, 200)

GUISetState(@SW_SHOW) ;
$i = 0
$flag = 0
While 1
$msg = GUIGetMsg()
If $msg == $GUI_EVENT_CLOSE Then ExitLoop
$flag += 1
If 50 == $flagThen
ControlMove($main, "", 3, $i, 200)
$i = $i + 20
If $i > 600 Then Exit
$flag = 0
EndIf
Sleep(10)
WEnd

pdp320921 发表于 2011-9-8 21:16:18

回复 4# happytc 0xF060代表什么？
$GUI_Rundefmsg在哪可查？

都市浪子666 发表于 2011-9-8 21:16:37

#include <GUIConstantsEx.au3>

$main=GUICreate("main",600,400,-1,-1)

$text =GUICtrlCreateLabel("hello,world",0,200)

GUISetState(@SW_SHOW) ;
$i = 0
   $flag = 1
   While 1



   $msg = GUIGetMsg()
            If $msg = $GUI_EVENT_CLOSE Then ExitLoop
            If $flag = 1 Then

                  sleep(500)

                  ControlMove( $main,"",3,$i,200)

                  $i = $i + 20
If $i > 600 Then ExitLoop ;ExitLoop 跳出循
EndIf


WEnd

MsgBox(0,0,"跳出循环")

xms77 发表于 2011-9-8 21:33:18

本帖最后由 xms77 于 2011-9-8 21:35 编辑

回复 7# happytc
我看楼主的意思好像不是在move完成后退出窗口，所以加了$flag，不让窗口关闭，只能通过X来关闭窗口，只是在Move过程中如果点击X不能及时关闭窗体。
弱弱地问一下，If 50 == $flag, 这个==是什么意思？菜鸟不明白，别笑我！

happytc 发表于 2011-9-8 21:40:14

回复 8# pdp320921

不是很清楚嘛，0xF060就是消息SC_CLOSE的值呀
我不知道这个常量在au3的那个*Constants.au3里，所以直接写值了
可以在微软网上查到：http://msdn.microsoft.com/en-us/library/ms646360(v=vs.85).aspx
觉得au3的常量定义的文件有点乱，经常要猜一个常量可能在那个文件里

$GUI_Rundefmsg这个是返回au3内部句柄消息。

happytc 发表于 2011-9-8 21:41:40

回复 10# xms77

比较符呀，跟‘>’，‘<’等一样呀

xms77 发表于 2011-9-8 21:45:58

回复 12# happytc
为什么不是用“=”，而用“==”呢？

happytc 发表于 2011-9-8 21:51:11

回复 13# xms77

本来==才是比较符，而=是赋值符。au3为了降低学难度，把=既当比较符，又当赋值符。

在if语句中用==比用=效率要高。

xms77 发表于 2011-9-8 22:00:06

回复 14# happytc
谢谢，总算明白了！

页: [1] 2

AUTOIT CN's Archiver

如何从循环中跳出？