#include <GUIConstantsEx.au3>
#include <ProgressConstants.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <ComboConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form3 = GUICreate("安装", 413, 173, -1, -1, '')
$Label1 = GUICtrlCreateLabel("正在安装,请稍候...", 160, 88, 108, 17)
$Pic1 = GUICtrlCreatePic("xp.jpg", 0, 0, 413, 78, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
$lable = GUICtrlCreateLabel('走马灯的演示效果... ', 206, 85, 200, 20)
GUICtrlSetBkColor($lable, $GUI_BKCOLOR_TRANSPARENT)
GUICtrlSetColor($lable, 0xFF0000)
GUICtrlSetFont($lable, 14)
$lable1 = GUICtrlCreateLabel('走马灯的演示效果... ', 612, 85, 200, 20)
GUICtrlSetBkColor($lable1, $GUI_BKCOLOR_TRANSPARENT)
GUICtrlSetColor($lable1, 0xFF0000)
GUICtrlSetFont($lable1, 14)
$Progress1 = GUICtrlCreateProgress(24, 104, 361, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
Local $i = 206, $k = 612
While 1
Sleep(50)
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
$percent = @SEC
;~ WinSetTitle('', '正在安装,请稍候...', $percent & "% 安装" )
$i -= 1
If $i = -200 Then $i = 612
GUICtrlSetPos($lable, $i, 85)
$k -= 1
If $k = -200 Then $k = 612
GUICtrlSetPos($lable1, $k, 85)
WEnd
|