compiler directives and defines to log

[himitsu]

https://www.delphipraxis.net/211379-...ml#post1511905

Jupp, funktioniert auch meinstens,

aber mit dem Nachteil, dass seit einer Weile rekursive IF/IFDEF immer voll ausgewertet werden und dann ErrorInsight, aber leider auch der Compiler abrauchen.

Delphi-Quellcode:

{$IF Declared(MyNonexistsConstant)}
  {$IF MyNonexistsConstant = 123}  // [dcc32 Fehler] E2026 Konstantenausdruck erwartet
     Beep;
  {$IFEND}
{$IFEND}

{$IF Declared(MyNonexistsConstant) and (MyNonexistsConstant = 123)}
  Beep;
{$IFEND}

Falls ErrorInsight funktioniert, dann zeigt er das auch direkt an.