[au3]#include <GUIConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 438, 162, 193, 125)
$Label1 = GUICtrlCreateLabel("请稍等", 112, 64,100,20)
AdlibEnable("wait", 1000)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
Func wait()
if GUICtrlRead($Label1)="请稍等...." then GUICtrlSetData($Label1,"请稍等")
GUICtrlSetData($Label1, GUICtrlRead($Label1) & ".")
EndFunc ;==>wait[/au3] |