[SOLVED] Question about Progress Bar

[johnmcloud]

Hi guys, i have two question about Progress bar,

I'm testing this code:

ProgressOn("Progress Bar", "Sample progress bar", "Working...")

For $i = 0 To 100
ProgressSet($i)
Sleep(5)
Next

MyFunc()

ProgressSet(100, "Done!")
Sleep(750)
ProgressOff()

1) Thi function does not work as expected, seem working with time, sometime finish first, sometime finish later. The func is a runwait(@comspec) can process file from 1MB to many GB, so i don't know how to set it

2) There is a version can integrate with GUI?

Thanks for support

Edited January 4, 2012 by johnmcloud

[hannes08]

Hello JohnMClound,

Look in the helpfile for the GUICtrlCreateProgress() function. It's very easy to use.

Edit: Typos

Edited January 4, 2012 by hannes08

[johnmcloud]

Thanks hannes,

But the example into the help isn't so clear for me

It's start - stop bar, always related to time

And don't understand where insert the func()

This is the func(), just for see what do:

$Path = GUICtrlRead($FolderInput)
$Pre = @TempDir & "Test.exe"
$Command = "-a -b"
$Folders= _RecFileListToArray($Path, "*.*", 0, 0, 0, 1, "*txt", "")
$Folders[0] = "@echo off" & @CRLF

$fFlag = ""
AdlibRegister("Update",333)
For $i = 1 To UBound($Folders) - 1
If RunWait(@ComSpec & " /c " & $pre & " " & $command & " " & $Password & " " & '"' & $Path & "" & $Folders[$i] & '"', @TempDir, @SW_HIDE) = 0 Then
    ConsoleWrite("Information - Success")
    Else
        $fFlag &= $i & "|"
    EndIf
    ConsoleWrite("Information - Fail")
  
Next
If $fFlag = "" Then
If GUICtrlRead($FolderCheckbox) = $GUI_CHECKED Then
  Another_Func()
EndIf
FileDelete(@TempDir & "Test.exe")
MsgBox(0, "Information","OK") ;---> Finish Here
Else
    $aFailed = StringSplit($fFlag, "|")
    $sMsg = "Error:" & @CRLF & @CRLF
    For $i = 1 To $aFailed[0] - 1
        $sMsg &= $Folders[$aFailed[$i]] & @CRLF
    Next
FileDelete(@TempDir & "Test.exe")
    MsgBox(16, "Error", $sMsg)
EndIf
AdlibUnRegister("Update")
WinSetTitle($GUI,"","Test")
EndFunc

Edited January 4, 2012 by johnmcloud

[johnmcloud]

Guys, i need a help

i have make this:

#include <GuiConstantsEx.au3>
#include <ProgressConstants.au3>
#Include <SendMessage.au3>
#NoTrayIcon

$GUI = GUICreate("Test", 400, 50)
$AProgress = GUICtrlCreateProgress(20, 10, 360, 20, BitOr ($PBS_MARQUEE,$PBS_SMOOTH))
$BProgress = GUICtrlGetHandle($AProgress)
_SendMessage($BProgress, $PBM_SETMARQUEE, True, 70)
GUISetState()
 
Do
    Sleep(10)
Until GUIGetMsg() = $GUI_EVENT_CLOSE

It's like preparation bar of Windows, so is infinite. But i don't know how to set it to Start - Func() - Stop.

Thanks for support

Edited January 4, 2012 by johnmcloud

[guinness]

Look at this >>

Edited January 4, 2012 by guinness

[johnmcloud]

I have a stupid question, i can set it to start total white? Without the green bar on the left?

And i need a little help to set the start - stop

Thanks guinness

Edited January 4, 2012 by johnmcloud

[guinness]

You mean like this >>

Edited January 4, 2012 by guinness

[kylomas]

johnmcloud,

If your application is for a progress bar during file copy there is an example of it in this thread

Good Luck,

kylomas

[johnmcloud]

johnmcloud,

If your application is for a progress bar during file copy there is an example of it in this thread

Good Luck,

kylomas

Thanks kylomas, but is not a file copy, the cmd call an external software without GUI.

This software process a file but i don't know how many time it process, depend on file dimention. So a tradition progress bar not work because it related to time

[johnmcloud]

You mean like this >>

Yes, but the Stop&Reset button don't reset for me, only stop the bar, and there is a way to start without the green line on the left?

Thanks for support

Edited January 4, 2012 by johnmcloud

[kylomas]

johnmcloud,

Progress bar's can be a couple of things, a percentage, an increment (like time), or an indicator of activity (marquee). Which are you after?

kylomas

[johnmcloud]

johnmcloud,

Progress bar's can be a couple of things, a percentage, an increment (like time), or an indicator of activity (marquee). Which are you after?

kylomas

I really don't know how use, increment is not useful because the software process file from 1MB to many GB, so it can be releated to time. Take a look to the script post at #3, i have only an array and a runwait command

[guinness]

Weird, because that example resets the progress bar. What version of AutoIt & Windows are you using please? I think the marquee progress bar is the best option to show the user there is some activity happening.

[johnmcloud]

guinness,

I'm using 3361 and now i'm on XP, but the script is for all platform include Windows 7

[guinness]

I'm using 3361 and now i'm on XP, but the script is for all platform include Windows 7

I would recommend firstly to download the latest version of AutoIt as this has a ton of bugfixes and improvements. Secondly try the example in the first post of that link I gave and let me know if it works.

[johnmcloud]

guinness,

Same thing, the script with two bar work ( the stop button reset the bar ) , the script with single bar ( Stop and Reset button ) don't work, just stop. If i click again, the bar move like 1 cm and stop.

[kylomas]

johnmcloud,

You are trying to run a pgm (test.exe) against all "txt" type files in a folder specified by the user. If that succedds you compound the $iflag variable. Then you run anotherfunc() if $iflag is not empty and some checkbox is checked.

You are adlibing something called "update".

First - do what guinness suggests

second - come up with some code that actually runs

If you cannot comeup with the code then describe what you want to do in psuedo-logic, e.g.

get all .txt files

process each file with pgm = test.exe

if sucessfull then...

blah...

blah...

blah...

Good Luck,

kylomas

[johnmcloud]

kylomas,

You are adlibing something called "update"

Func Update()
Switch Mod($Increase,4)
  Case 0
   WinSetTitle($GUI,"","... |")
  Case 1
   WinSetTitle($GUI,"","... /")
  Case 2
   WinSetTitle($GUI,"","... —")
  Case 3
   WinSetTitle($GUI,"","... ")
EndSwitch
$Increase+=1
EndFunc

Is not useful to post this for what i need, but post is not a problem

Edited January 4, 2012 by johnmcloud

[kylomas]

Johnmcloud,

Maybe the screwball editor ate your code, regardless, post the whole thing.

kylomas

[johnmcloud]

kylomas,

That's all the code, there is only a GUI ( incomplete ) with a button that call Func() at post #3 and an inputbox for path

The Another_Func() is a simply FileDelete() and Update() i'll post up this

Edited January 4, 2012 by johnmcloud