Hallo Martin,
die Definitionen gelten nur innerhalb der
Unit.
Du kannst diese allerdings auch in eine *.inc Datei auslagern und dann in jede
Unit, in der das benötigt wird, einbinden:
switches.inc
Delphi-Quellcode:
const
{$IFDEF PROJEKT1}
C_KONSTANTE = 'string1';
{$ELSEIF PROJEKT2}
C_KONSTANTE = 'string2';
{$ELSEIF PROJEKT3}
C_KONSTANTE = 'string3';
{$ELSE}
C_KONSTANTE = 'elsestring';
{$IFEND}
project1.pas
Delphi-Quellcode:
unit project1;
interface
uses [...]
{$DEFINE PROJEKT1}
{$I 'switches.inc'}
implementation
[...]
project2.pas
Delphi-Quellcode:
unit project1;
interface
uses [...]
{$DEFINE PROJEKT2}
{$I 'switches.inc'}
implementation
[...]