Das mit dem Application.ShowMainform weiß ich jetzt net wos genau hinkommt, ich hab allerdings was gefunden per Google, was das ganze recht einfach macht...
Delphi-Quellcode:
program XYZ;
uses
Forms,
UiChem in 'UiChem.pas' {Form1},
Ablage in 'Ablage.pas' {Form2},
Rechner in 'Rechner.pas' {Form3},
Splash in 'Splash.pas' {Form4};
{$R *.res}
begin
Form4 := TForm4.Create (Application); {Splash Screen anzeigen}
try
Form4.Show;
Form4.Update;
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.CreateForm(TForm2, Form2);
Application.CreateForm(TForm3, Form3);
Form4.Hide; {Splash Screen ausblenden}
finally
Form4.Free;
end;
Application.Run;
end.
Allerdings kann ich jetzt keinen sleep Befehl einbinden, da er das nicht kennt, aber das lässt sich lösen indem man in die uses noch ein "SysUtils," einfließen lässt, dann kann ich einen sleep(2000) z.b einbinden, klappt wunderbar... endlich
