define in anderer Unit wird nicht 'erkannt'

[himitsu]

Zitat von Viktorii:

Habe mittlerweile die richtige Stelle gefunden: Delphi-Compiler->Bedingungen.

Wenn sich diese Definition "öfters" mal ändern könnte, dann nimm Abstand davon.

Der Compiler bekommt diese Änderungen nicht mit und wenn sich sonst nichts in einer Unit geändert hat, dann wird sie nicht neu kompiliert.
Da hilft dann nur neu "erzeugen", was man gerne mal vergißt.
(macht voll Spaß, wenn man diese Condition in mehreren Units verwendet und diese am Ende unterschiedlich kompiliert wurden)

Ein Include-Datei wird dagegen immer beachtet.




Mit sowas hatte ich mir mal beholfen, als ich das DEFINE in eine andere Unit weiterreichen wollte.

Delphi-Quellcode:

// ########## Unit 1 ##############################

{$DEFINE IRGENDWAS}  // oder in den Projektoptionen

...

{$IFDEF IRGENDWAS}
  const IRGENDWAS_MARKER = True;
  {$MESSAGE Hint 'Define "IRGENDWAS" wurde gesetzt.'}  // nur sichtbar, wenn die Unit gerade kompiliert wurde
{$ENDIF}

...

{$IFDEF IRGENDWAS}...{$ENDIF}

// ########## Unit 2 ##############################

uses Unit1;

{$UNDEF IRGENDWAS}
{$IF Declared(IRGENDWAS_MARKER)}
  {$DEFINE IRGENDWAS}
{$IFEND}

...

{$IFDEF IRGENDWAS}...{$ENDIF}