Hallo,
Es gibt ja nun schon ein paar möglichkeiten, Dateien mit Progressbar zu kopieren. Hier eine weitere Idee von mir
[autoit]
Func CopyWithProgress($srcDir, $destDir)
If StringRight($srcDir, 1) = "\" Then $srcDir = StringLeft($srcDir, StringLen($srcDir) - 1)
If StringRight($destDir, 1) <> "\" Then $destDir = $destDir & "\"
If Not FileExists($destDir) Then DirCreate($destDir)
$srcSize = DirGetSize($srcDir, 1)
$1_percent = $srcSize[0] / 100
Run('XCOPY "'& $srcDir & '" "' & $destDir & '" /D /S /E /V /C /H /R /O /Y')
ProgressOn("Advanced status of file copying", $1_percent & "%", "")
Do
$destSize = DirGetSize($destDir, 1)
ProgressSet(Round($destSize[0] / $1_percent, 2), Round($destSize[0] / (1024 * 1024), 2) & " MB of " & Round($srcSize[0] / (1024 * 1024), 2)& " MB copied" & @CRLF _
& $destSize[1] & " of " & $srcSize[1] & " Files copied." & @CRLF _
& $destSize[2] & " of " & $srcSize[2] & " Folders copied.", Round($destSize[0] / $1_percent, 2) & "% - Done!")
Sleep(200)
Until $destSize[0] >= $srcSize[0]
ProgressOff()
EndFunc
Die Sache ist sehr einfach gestrickt und kommt ohne Includes aus. Trozdem sieht man wie ich finde alles wichtige ausser die verbleibende Zeit.
probierts aus.
greez