浏览代码

Quick.Chrono: small fix

Unknown 7 年之前
父节点
当前提交
45ebca18e6
共有 1 个文件被更改,包括 2 次插入2 次删除
  1. 2 2
      Quick.Chrono.pas

+ 2 - 2
Quick.Chrono.pas

@@ -7,7 +7,7 @@
   Author      : Kike Pérez
   Author      : Kike Pérez
   Version     : 1.2
   Version     : 1.2
   Created     : 27/08/2015
   Created     : 27/08/2015
-  Modified    : 02/03/2018
+  Modified    : 20/03/2018
 
 
   This file is part of QuickLib: https://github.com/exilon/QuickLib
   This file is part of QuickLib: https://github.com/exilon/QuickLib
 
 
@@ -183,7 +183,7 @@ end;
 
 
 class function TChronometer.MillisecondsToString(aMilliseconds : TLargeInteger; LongFormat : Boolean = False) : string;
 class function TChronometer.MillisecondsToString(aMilliseconds : TLargeInteger; LongFormat : Boolean = False) : string;
 begin
 begin
-  MillisecondsToString(aMilliseconds.ToExtended,pfTruncate,LongFormat);
+  Result := MillisecondsToString(aMilliseconds.ToExtended,pfTruncate,LongFormat);
 end;
 end;
 
 
 class function TChronometer.Precission(aValue : Extended; FormatPrecission : TPrecissionFormat) : Extended;
 class function TChronometer.Precission(aValue : Extended; FormatPrecission : TPrecissionFormat) : Extended;