[commons] cleanup

DelphiPraxis · Jul 14, 2020 · 242d1a3 · 242d1a3
1 parent c187255
commit 242d1a3
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/Quick.Commons.pas b/Quick.Commons.pas
@@ -785,8 +785,10 @@ function NowStr : string;
 end;
 
 function NewGuidStr : string;
+{$IFNDEF DELPHIRX10_UP}
 var
   guid : TGUID;
+{$ENDIF}
 begin
   {$IFDEF DELPHIRX10_UP}
   Result := TGUID.NewGuid.ToString;