Lizenzabfrage vor Programmstart

[Jens Hartmann]

Hallo nochmal zusammen,

Habe jetzt alles so gemacht und die Lizezabfrage soweit am laufen.

Sie Quellcode:

Delphi-Quellcode:

    Application.Initialize;
    if Lizenzkey = 'Lizenznummer: Demoversion' then
    begin
      TFLizenz := TTFLizenz.Create(Application);
        if TFLizenz.ShowModal = mrOK then
          begin
            Form1.Lizenznummer := True;
            Application.CreateForm(TForm1, Form1);
            Application.Run;
          end
        else
          begin
            if TFLizenz.ShowModal = mrCancel then
            Form1.Lizenznummer := False;
            Application.CreateForm(TForm1, Form1);
            Application.Run;
          end;
        end;
end.

Leider wird mir bei dem Zuweisen der Variablen immer noch der Fehler (siehe Anhang) beim Compelieren gemeldet.

Woran könnte das noch liegen?

MFG Jens