Wie kann ich einen Splash erstellen ?

[Ferber]

Im Hauptprogramm die SplashForm erzeugen, anzeigen und vor dem Application.Run wieder entfernen.
In etwa so (TFOSplash ist das SplashFormular):

Delphi-Quellcode:

begin
  Application.Initialize;
  FOSplash:=TFOSplash.Create(Application);
  FOSplash.Show;
  FOSplash.Update;
  Application.CreateForm(TForm1, Form1);
  Application.CreateForm(TForm2, Form2);
  ...
  Application.CreateForm(TFormx, Formx);
  FOSplash.Hide;
  FOSplash.Free;
  Application.Run;
end.

In den ProgrammOptionen FOSplash nicht automatisch erzeugen lassen.
Stört zwar nicht, ist aber überflüssig.