Changeset 81 for oup/current

Timestamp:

Jan 13, 2007, 5:20:05 PM (18 years ago)

Author:

alloc

Message:

 

Location:

oup/current

Files:

• Helper_LevelDB.pas (modified) (2 diffs)
• exe/OniUnPacker.exe (modified) ( previous)

oup/current/Helper_LevelDB.pas

@@ -263 +263 @@
     if ((i mod 10) = 0) and (i >= 100) then
       lbl_estimation.Caption := 'Estimated time left: ' + TimeToStr(
-        (Time - begintime) / i * (progress.Max - i + 1) * 1.1 );
+        (Time - begintime) / i * (progress.Max - i + 1) * 1.1, timeformat );
     progress.Position := i + 1;
     lbl_progress.Caption := 'Files done: ' + IntToStr(i + 1) + '/' + IntToStr(progress.Max);
@@ -533 +533 @@
     if ((i mod 10) = 0) and (i >= 100) then
       lbl_estimation.Caption := 'Estimated time left: ' + TimeToStr(
-        (Time - begintime) / i * (progress.Max - i + 1) * 1.1 );
+        (Time - begintime) / i * (progress.Max - i + 1) * 1.1, timeformat );
     progress.Position := i;
     lbl_progress.Caption := 'Files done: ' + IntToStr(i) + '/' + IntToStr(progress.Max);