| 262 |
|
|
| 263 |
|
if ((i mod 10) = 0) and (i >= 100) then |
| 264 |
|
lbl_estimation.Caption := 'Estimated time left: ' + TimeToStr( |
| 265 |
< |
(Time - begintime) / i * (progress.Max - i + 1) * 1.1 ); |
| 265 |
> |
(Time - begintime) / i * (progress.Max - i + 1) * 1.1, timeformat ); |
| 266 |
|
progress.Position := i + 1; |
| 267 |
|
lbl_progress.Caption := 'Files done: ' + IntToStr(i + 1) + '/' + IntToStr(progress.Max); |
| 268 |
|
Application.ProcessMessages; |
| 532 |
|
end; |
| 533 |
|
if ((i mod 10) = 0) and (i >= 100) then |
| 534 |
|
lbl_estimation.Caption := 'Estimated time left: ' + TimeToStr( |
| 535 |
< |
(Time - begintime) / i * (progress.Max - i + 1) * 1.1 ); |
| 535 |
> |
(Time - begintime) / i * (progress.Max - i + 1) * 1.1, timeformat ); |
| 536 |
|
progress.Position := i; |
| 537 |
|
lbl_progress.Caption := 'Files done: ' + IntToStr(i) + '/' + IntToStr(progress.Max); |
| 538 |
|
Application.ProcessMessages; |