{$ifdef LCL}

[Mathias]

Ich habe eine Package, bei der ich abfragen will, ob im Hauptprogramm die LCL-Package verwendet wird.
Folgendes funktioniert schön brav in einem einfachen Programm.

Code: Alles auswählen

{$ifdef LCL}
  ShowMessage('Error');
{$else}
  Writeln('Error');
{$endif}

Aber sobald ich eine eigene Package einbinde, welche die LCL verwendet, steht der Schalter auf LCL.

Nun will ich gerne diesen Schalter in meiner Package verwenden, so das ich das LCL-Zeugs in der Package bei Bedarf ausblendet.
ZB. das obige Beispiel mit ShowMessage und Writeln.

[Mathias]

Ich konnte da Problem lösen.
Ich habe einfach 2 Packages mit den gleichen Units erstellt
Bei der einten Package habe ich die Package LCL_Base eingebunden und bei der anderen entfernt.
Jetzt funktioniert "{$ifdef LCL}" in den Units wie erwartet.