Problem bei meinem Loginsystem & der Hauptunit

[Bummi]

Je nach Anforderung vielleicht auch so?

Delphi-Quellcode:

program Project1;

uses
  Forms,Controls,
  Unit2 in 'Unit2.pas' {Mainform},
  Unit3 in 'Unit3.pas' {Loggin};

{$R *.res}

begin
  Application.Initialize;
  With TLoggin.Create(Application) do
    try
      Showmodal;
      if Modalresult = mrOK then
        begin
          Application.MainFormOnTaskbar := True;
          Application.CreateForm(TMainform, Mainform);
          Application.Run;
        end;
    finally
      Free;
    end;
end.