🚀 go-pugleaf

Dnia Fri, 10 Dec 2010 08:59:36 +0000, InDesign Scripts napisał(a):

>> For Each fName As String In Directory.GetFiles(sourcePath)
>>             If File.Exists(fName) Then
>>                 Dim dFile As String = String.Empty
>>                 dFile = Path.GetFileName(fName)
>>                 Dim dFilePath As String = String.Empty
>>                 dFilePath = DestinationPath + dFile
>>                 File.Copy(fName, dFilePath, True)
>>                 ProgressBar1.Value = y
>>                 ProgressBar1.Refresh()
>>                 y = y + x
>>             End If
>>         Next
>> 
>> Sprawa polega na tym, ze nie odswieza sie pasek postepu.
>> Robilem juz rozne cuda i nic.
>> Samo powyzsze kopiowanie trwa okolo 5 min, wiec przydal by sie dzialajacy
>> progressbar, prawda?
>> Jak to ugryzc?
> 
> a gdzie ustawiasz NOWĄ wartość "x"?
> bo "x" to chyba ilość aktualnie skopiowanych danych/plików/etc.?
> 
> robin

X obliczam wczesniej dzielac 100 przez ilosc plikow (pliki sa podobej
wielkosci).
Daje nam to srednia 1 pliku.