| 100 |
|
// FILE EXISTS CHECK FÜR DAT/RAW/SEP!!! |
| 101 |
|
// |
| 102 |
|
|
| 103 |
+ |
timeformat.ShortTimeFormat := 'hh:nn:ss'; |
| 104 |
|
timeformat.LongTimeFormat := 'hh:nn:ss'; |
| 105 |
|
timeformat.TimeSeparator := ':'; |
| 106 |
|
|
| 371 |
|
TOniDataDat(OniDataConnection).UnloadWhenUnused := False; |
| 372 |
|
end; |
| 373 |
|
|
| 374 |
+ |
timeformat.LongTimeFormat := 'hh:nn:ss'; |
| 375 |
+ |
timeformat.ShortTimeFormat := 'hh:nn:ss'; |
| 376 |
+ |
timeformat.TimeSeparator := ':'; |
| 377 |
+ |
|
| 378 |
|
Self.Visible := True; |
| 379 |
|
Form_Main.Visible := False; |
| 380 |
|
step := 0; |
| 552 |
|
lbl_progress.Caption := 'Files done: ' + IntToStr(progress.Max) + '/' + |
| 553 |
|
IntToStr(progress.Max); |
| 554 |
|
|
| 550 |
– |
timeformat.LongTimeFormat := 'hh:nn:ss'; |
| 551 |
– |
timeformat.TimeSeparator := ':'; |
| 555 |
|
lbl_estimation.Caption := 'FINISHED (duration: ' + TimeToStr(Time - absolutebegintime, timeformat) + ')'; |
| 556 |
|
|
| 557 |
|
DoStep('FIN'); |