Fehler vor OnCreate finden

[Ykcim]

Zitat:

Mir sind in der Dpr 2 Sachen aufgefallen
Application.CreateForm(TForm_LogIn, Form_LogIn); wird erzeugt, aber wohl nicht mehr gebraucht?

Application.Run;
Main.WindowState:=wsMaximized;
Das hat keine Wirkung, weil Delphi in der Run-Methode bleibt,
bis das Hauptprogramm (Main) beendet wird.

Vielen Dank, habe ich geändert...

Delphi-Quellcode:

begin
  Application.Initialize;
  Application.MainFormOnTaskbar := True;
  if ( not DoLogin ) then
      Exit;
  Application.CreateForm(TMain, Main);
  Application.CreateForm(TForm_Zeichnungen, Form_Zeichnungen);
  Application.CreateForm(TForm_Filter, Form_Filter);
  Application.CreateForm(TForm_Passwort, Form_Passwort);
  Application.CreateForm(TForm_Start, Form_Start);
  Application.CreateForm(TForm_Return, Form_Return);
  Main.WindowState:=wsMaximized;
  Application.Run;
end.