Delphi – uses controls unit in all versions of Delphi, VCL, FMX

[FireWind]

Delphi – uses controls unit in all versions of Delphi, VCL, FMX
Scott Hollows

Спойлер: Content

[SHOWTOGROUPS=4,20,22]
This shows how to USE the CONTROLS unit in a way that will work for all versions of Delphi (old and new) as well as VCL and FireMonkey.,
You can use variations of this for other units
There are other ways to achieve this, which I wont go into here.
This is how I do it.

uses
       {$IF CompilerVersion >= 23.0} // 23 is Delphi XE2
            {$IF not declared(FireMonkeyVersion)}
                 VCL.Controls,
            {$ELSE}
                 FMX.Controls,
            {$IFEND}
       {$ELSE} // VCL prior to XE2
            Controls,
       {$IFEND}
       MyOtherUnits;

[/SHOWTOGROUPS]