浏览代码

* Improve clarity of MR !1056

Michaël Van Canneyt 3 月之前
父节点
当前提交
45df8cc902
共有 1 个文件被更改,包括 1 次插入1 次删除
  1. 1 1
      packages/vcl-compat/src/system.diagnostics.pp

+ 1 - 1
packages/vcl-compat/src/system.diagnostics.pp

@@ -178,7 +178,7 @@ var
 
 begin
   clock_gettime(CLOCK_MONOTONIC, @res);
-  Result:=((Int64(1000000000)*res.tv_sec)+res.tv_nsec) div 100;
+  Result:=((Int64(100*StopWatchResolution)*res.tv_sec)+res.tv_nsec) div 100;
 end;