* Better uses clause for Delphi, less warnings

git-svn-id: trunk@45252 -

packages/fcl-json/src/fpjsontopas.pp

@@ -397,7 +397,8 @@ begin
   if (S<>'') and (S[1]<>',') then
     S:=', '+S;
   if jpoDelphiJSON in Options then
-    S:='JSON'+S
+    // Collections to avoid warnings about unexpanded inlines
+    S:='System.Generics.Collections, JSON'+S
   else
     S:='fpJSON'+S;
   S:='SysUtils, Classes, '+S;