Wie erstellt man eine DEMO-Version

[Luckie]

Du kannst mit Hilfe von Compilerschaltern eine bedingte Compilierung erreichen. Das ist in der Regel einfachher als Ein- und Auskommentieren:

Delphi-Quellcode:

{.$DEFINE DEMO}

...

{$IFDEF DEMO}
        SetTextColor(dc, RGB(255, 0, 0));
        rect.Top := rect.Top + 3;
        rect.Right := rect.Right - 10;
        DrawText(dc, PChar(rsDemo), length(rsDemo), rect, DT_CENTER);
{$ENDIF}

In diesem Fall ist der Compilerschalter deaktiviert und es wird eine Vollversion erstellt. Nimmst du den Punkt bei DEFINE weg, ist der Compilerschalter aktiviert und der Code zwischen IFDEF und ENDIF wird mitkompiliert.