Wo kann ich dann diesen Code hinstecken, so dass es funktioniert?
Delphi-Quellcode:
program SplashScreen;
uses
Forms,
Unit1 in 'Unit1.pas' {Form1},
Unit8 in 'Unit8.pas' {Form8};
{$R *.res}
begin
Form8:= TForm8.Create(Application);
try
Form8.Show;
Form8.Refresh;
Application.Initialize;
Application.CreateForm(TForm8, Form8);
// (1)
// weitere Formulare und Datenmodule hier her verschieben (siehe 2)
finally
Form8.InitializationDone := True;
end;
// (2)
// Standardmäßig erstellte Formulare wird Delphi hier eintragen
// nach (1) verschieben !!!
Application.Run;
end.