Hilfe mit Progress --> DirMove

Hallo Leute!

Skript funktioniert nach Plan, allerdings bringe ich kein Progressbar zustanden:
Wer kann mir helfen?

[autoit]

#include <array.au3>
#include <File.au3>
#include <GUIConstants.au3>
#include <WindowsConstants.au3>

[/autoit][autoit][/autoit][autoit]

Global $szDrive, $szDir, $szFName, $szExt, $array[100], $i=0, $uebergabe[100], $ordnerZiel, $count = 0

[/autoit][autoit][/autoit][autoit]

; Script Start - Add your code below here

[/autoit][autoit][/autoit][autoit]

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("", 200, 180, 190, 215)
$btnSelect = GUICtrlCreateButton("Ordner auswählen", 40, 20, 120, 25, 0)
$btnZiel = GUICtrlCreateButton("Ziel auswählen", 40, 65, 120, 25, 0)
$btnVerschieben = GUICtrlCreateButton("Verschieben!!!", 40, 105, 120, 25, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

[/autoit][autoit][/autoit][autoit]

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

Case $btnSelect
While True
$array[$i] = FileSelectFolder("Wähle Ordner", @HomeDrive, 2)
If @error = 1 Then ExitLoop
$pathSplit = _PathSplit($array[$i],$szDrive, $szDir, $szFName, $szExt)
_ArrayInsert($uebergabe, $i, $pathSplit[3])
;~ MsgBox(0,"",$uebergabe[0])
$i += 1
WEnd

Case $btnZiel
$ordnerZiel = FileSelectFolder("Wähle Ziel", @HomeDrive, 2)

Case $btnVerschieben
for $j = 0 to $i - 1
$folderMove = DirMove($array[$j], $ordnerZiel & "\" & $uebergabe[$j], 1)
If $folderMove = 1 Then
MsgBox(64,"Erfolgreich", "Ordner erfolgreich verschoben",3)
Else
MsgBox(64,"Fehler", "Ordner nicht erfolgreich verschoben",3)
EndIf

Next

[/autoit][autoit][/autoit][autoit]

EndSwitch
WEnd

[/autoit]

Zitat von L3viathan2142

[autoit]

;...
Case $btnVerschieben
ProgressOn("Verschiebe...","Verschiebe...")
for $j = 0 to $i - 1
ProgressSet(100*($j/$i-1))
$folderMove = DirMove($array[$j], $ordnerZiel & "\" & $uebergabe[$j], 1)
If $folderMove = 1 Then
MsgBox(64,"Erfolgreich", "Ordner erfolgreich verschoben",3)
Else
MsgBox(64,"Fehler", "Ordner nicht erfolgreich verschoben",3)
EndIf
ProgressOff()
Next
;...

[/autoit]

Meinst du so?

Alles anzeigen

Ok, vielen dank, aber ich möchte dass er mir die Prozente anzeigt..
Wieviel Prozent er kopiert hat..

nein leider auch nicht..