Index: oup/current/Helper_LevelDB.pas
===================================================================
--- oup/current/Helper_LevelDB.pas	(revision 84)
+++ oup/current/Helper_LevelDB.pas	(revision 85)
@@ -101,4 +101,5 @@
   //
 
+  timeformat.ShortTimeFormat := 'hh:nn:ss';
   timeformat.LongTimeFormat := 'hh:nn:ss';
   timeformat.TimeSeparator := ':';
@@ -371,4 +372,8 @@
   end;
 
+  timeformat.LongTimeFormat := 'hh:nn:ss';
+  timeformat.ShortTimeFormat := 'hh:nn:ss';
+  timeformat.TimeSeparator := ':';
+
   Self.Visible := True;
   Form_Main.Visible := False;
@@ -548,6 +553,4 @@
     IntToStr(progress.Max);
 
-  timeformat.LongTimeFormat := 'hh:nn:ss';
-  timeformat.TimeSeparator := ':';
   lbl_estimation.Caption := 'FINISHED (duration: ' + TimeToStr(Time - absolutebegintime, timeformat) + ')';