Du könntest ins Form1.Paint schreiben:
Delphi-Quellcode:
IF Form1.Tag = 0 //Irgendwas, was dir sagt, dass das Programm zu ersten Mal gestartet wird
THEN
begin
Form1.Hide; //1. Form verstecken
Form2.Show; //StartFenster anzeigen
Form2.Timer1.Enabled := true; //Timer an
Form1.Tag := 1 //Variable ändern, damit der StartBildschirm nicht bei jedem Paint von Form1 angezeigt wird
end;
Und in den Timer einfach:
Delphi-Quellcode:
Form1.show;
Form2.hide;
Timer1.Enabled := false;
Man liests sich, Stanlay
