// und mit D4 unter Win98

// Manchmal muss eine andere Form  vor Form1 erzeugt werden, Form1 soll aber
// Hauptform bleiben. Wenn man einfach nur das CreateForm dieser Form nach
// oben setzt, wird die falsche Form zur Hauptform. 
// Deshalb hier dieser kleine Trick:

{$R *.RES}

begin
Application.Initialize;
  Form3:=TForm3.create(application);   // <--------
Application.CreateForm(TForm1, Form1);
Application.CreateForm(TForm2, Form2);
Application.Run;
  Form3.free;                          // <--------
end.

// Diese Prinzip kann man auch anwenden, um einen Intro-Bildschirm zu
// erzeugen, der vor Beginn des eigentlichen Programms wieder gelöscht wird.
// Die Freigebe dieses Splashscreen muss dann vor Application.Run erfolgen.
// Hier im Beispiel ist es Form2.

{$R *.RES}

begin
Application.Initialize;
  Form2:=TForm2.create(application);
  Form2.Show;
Application.CreateForm(TForm1, Form1);
Application.CreateForm(TForm3, Form3)
// hier noch alles laden, was Zeit in Anspruch nimmt
  Form2.free;
Application.Run;
end.