Einzelnen Beitrag anzeigen

Benutzerbild von KodeZwerg
KodeZwerg

Registriert seit: 1. Feb 2018
3.685 Beiträge
 
Delphi 11 Alexandria
 
#13

AW: VCL Types in FMX Anwendung

  Alt 5. Jul 2018, 18:37
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.
Gruß vom KodeZwerg
  Mit Zitat antworten Zitat