举报
#include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> $Form1 = GUICreate("测试", 133, 65, 192, 124) $Label1 = GUICtrlCreateLabel("加载中......", 40, 16, 90, 17) GUISetState(@SW_SHOW) While 1 $SS="加载中." $i=1 While 1 $SS=$SS&"." $i=$i+1 If $i=6 Then $SS="加载中." $i=1 EndIf GUICtrlSetData($Label1,$SS) Sleep(500) WEnd $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit EndSwitch WEnd
#include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> $Form1 = GUICreate("测试", 133, 65, 192, 124) $Label1 = GUICtrlCreateLabel("加载中", 40, 16, 90, 17) GUISetState(@SW_SHOW) $SS = "." AdlibRegister("_conut" ,1000) While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit EndSwitch WEnd Func _conut() $SS = $SS & "." If StringLen($SS) > 6 Then $SS = "." GUICtrlSetData($Label1, "加载中" & $SS) EndFunc
2# jhun 又是一个死循环。 即即 发表于 2009-7-1 08:20
#include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> $Form1 = GUICreate("测试", 133, 65, 192, 124) $Label1 = GUICtrlCreateLabel("加载中", 40, 16, 90, 17) GUISetState(@SW_SHOW) While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case Else $SS="加载中." $i=1 $T = 0 while 1 if timerdiff($T) > 3000 then $T = timerinit() $SS=$SS&"." $i=$i+1 If $i=5 Then $SS="加载中." $i=1 EndIf GUICtrlSetData($Label1,$SS) endif if guigetmsg() = -3 then exit WEnd EndSwitch WEnd
AdlibRegister("_conut" ,1000 )
本版积分规则 发表回复 回帖后跳转到最后一页
|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度
GMT+8, 2025-2-25 13:25 , Processed in 0.086470 second(s), 19 queries .
Powered by Discuz! X3.5 Licensed
© 2001-2024 Discuz! Team.