Progress

[Jussip]

How i can make this working?

I dont wanna open other progress window..

#include <GUIConstants.au3>
$Form1 = GUICreate("Progress", 198, 91, 193, 125)
$Progress1 = GUICtrlCreateProgress(16, 16, 150, 17)
$Process = GUICtrlCreateButton("Progress on!", 24, 48, 75, 25, 0)
GUISetState(@SW_SHOW)

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit

        Case $Process
    EndSwitch
WEnd

[i542]

#include <GUIConstants.au3>
$Form1 = GUICreate("Progress", 198, 91, 193, 125)
$Progress1 = GUICtrlCreateProgress(16, 16, 150, 17)
$Process = GUICtrlCreateButton("Progress on!", 24, 48, 75, 25, 0)
GUISetState(@SW_SHOW)

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit

        Case $Process
            For $i = 1 To 100
               GuiCtrlSetData($progress, $i)
               Sleep(250)
            Next
    EndSwitch
WEnd

edit: Bug fix

Edited October 16, 2008 by i542

[Jussip]

#include <GUIConstants.au3>
$Form1 = GUICreate("Progress", 198, 91, 193, 125)
$Progress1 = GUICtrlCreateProgress(16, 16, 150, 17)
$Process = GUICtrlCreateButton("Progress on!", 24, 48, 75, 25, 0)
GUISetState(@SW_SHOW)

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit

        Case $Process
            For $i = 1 To 100
               GuiCtrlSetData($progress, 1)
               Sleep(250)
            Next
    EndSwitch
WEnd

Thanks, but the progress bar isnt moving? Edited October 16, 2008 by Jussip

[AdmiralAlkex]

change

GuiCtrlSetData($progress, 1)

to

GuiCtrlSetData($progress, $1)

[i542]

change

GuiCtrlSetData($progress, 1)

to

GuiCtrlSetData($progress, $1)

*coughs* to $i

[AdmiralAlkex]

*coughs* to $i

(I guess we both didn't look hard enough!)