Ich krieg mein Fenster nicht automatisch aktiv.

[t2000]

Einzige Änderung: Der Timer, der den Splash verzögert schließt.

Wenn mir jemand die Gründe erklären könnte, wäre ich sehr dankbar.

Delphi-Quellcode:

procedure TfrmDesktop.ApplicationEventsIdle(Sender: TObject; var Done: Boolean);
begin
  if frmSplash <> nil then begin
    SystemInit;
    FfrmMain := TfrmMain.Create( self);
    FfrmMain.Init;
    FfrmMain.Show;
    TimerSplash.Enabled := True;
  end;
end;

procedure TfrmDesktop.TimerSplashTimer(Sender: TObject);
begin
  TimerSplash.Enabled := False;
  FreeAndNil( frmSplash);
end;