Per .dpr defined, per Create getestet
Delphi-Quellcode:
procedure TForm18.FormCreate(Sender: TObject);
begin
{$IFDEF Schokohase}
mmo1.Lines.Add('Schokohase: True');
{$ELSE Schokohase}
mmo1.Lines.Add('Schokohase: False');
{$ENDIF Schokohase}
end;
und jupp, kommt ein False raus. Wieder was dazu gelernt.