Splashscreen: Formcreate der Mainform ausführen

[Svenkan]

Ich habe dieses Tutorial von dieser Seite benutzt. Dort wird der Splash-Screen in folgendem Code abgerufen:

Delphi-Quellcode:

begin
  Splash := TSplash.Create(Application);
  try 
    Splash.Show;
    Splash.Refresh;
    Application.Initialize;
    Application.Title := 'VPlan';
    Application.CreateForm(THauptform, Hauptform);
    Application.CreateForm(TGrundeinstellungen, Grundeinstellungen);
    Application.CreateForm(TAbout, About);
    Application.CreateForm(TLizenz, Lizenz);
    Application.CreateForm(THTMLFarben, HTMLFarben);
    Application.CreateForm(TSettings_FTP, Settings_FTP);
    Application.CreateForm(TIndexseite, Indexseite);
  finally
    Splash.InitializationDone := True; 
  end;
  Application.Run;