Delphi-Quellcode:
uses
types,
classes,
SysUtils,
{$IFDEF FrameWork_VCL}
vcl.Graphics,
.....
{$ENDIF}
{$IFDEF FrameWork_FMX}
FMX.Graphics,
.....
{$ENDIF}
....
Diese ifdefs kann man im Prinzip auch durch
unit aliases oder
unit scope names ersetzen. Dann bleibt der Code lesbarer. Allerdings ist dann evtl. nicht mehr ganz so gut sichtbar, welche
Unit jeweils vewendet wird.