*.dpr in Uses aufnehmen?

[Plague]

Hallo,

ich möchte meine Datei (SplashScreen.dpr) in die Uses Klausel meines Projektes aufnehmen. Wie mache ich das denn?

Gruß
Thomas

[Chewie]

Gar nicht. Das geht nur mit Units.

[Die Muhkuh]

sicher?

Gehts das vielleicht mit SplashScreen in 'SplashScreen.dpr' ?

[Plague]

Also ich habe das Tutorial bezüglich der SplashScreens gelesen und das so verstanden...

Gruß
Thomas

[Oxmyx]

.DPR ist doch eine Delphi-Projektdatei. In der Uses-Klausel kannst du aber nur Units (.PAS) einbinden. Mir ist auch nicht so ganz klar, was ein Splashscreen in der Projektdatei verloren hat. Dort sollten eigentlich keine Programmfunktionen stehen.

[Plague]

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.

[Chewie]

In deine Programm-Datei!

[Plague]

Ich habe das nun in die Programm Datei eingetragen, jedoch bricht das Programm nach dem der SplashScreen angezeigt wurde einfach ab.

Was kann ich machen?
Hier der Code?

Delphi-Quellcode:

begin
  Form8:= TForm8.Create(Application);
  try 
    Form8.Show; 
    Form8.Refresh;
    Application.Initialize;
    Application.CreateForm(TForm8, Form8);
  finally 
    Form8.InitializationDone := True;
  end; 
     Application.Title := 'Netzwerk Server';
    Application.CreateForm(TForm1, Form1);
    Application.CreateForm(TForm5, Form5);
    Application.CreateForm(TForm6, Form6);
    Application.CreateForm(TForm7, Form7);
    Application.Run;
end.

Gruß
Thomas