Wie kann ich beim Start meiner Anwendung einen Startbildschirm (Splash-Screen) anzeigen?

Um einen Startbildschirm (SplashScreen) a la Delphi zu bekommen braucht man nur ein entsprechendes Form namens IntroWin (evtl. noch BorderStyle auf bsNone und Position auf poScreenCenter). Um dieses Fenster vor dem Erstellen aller anderen Fenster anzuzeigen geht man folgendermaßen vor:

Im Projekt-Quelltext folgende Zeilen hinzufügen:

begin
    Application.Initialize;
    Application.Title := 'Mein Programm';
    try
      IntroWin := TIntroWin.Create(Application);
      IntroWin.show;
      IntroWin.refresh;
      Application.CreateForm(TMainWin,MainWin);
      // hier evtl. noch andere Formulare erstellen und Datenbanken öffnen
      ...
      IntroWin.hide;
    finally
      IntroWin.Release;
    end;
    Application.Run;
  end.

siehe auch:

Beispielprojekte: Ein Splash-Screen

Delphi FAQ