@@ -307,7 +307,10 @@ begin
Addln('');
Addln('interface');
- AddLn('uses types;');
+ if DelphiCode then
+ AddLn('uses System.Types;')
+ else
+ AddLn('uses types;');
EnsureSection(csType);