Ereignisreihenfolge beim Anzeigen mehrerer Formulare

[PeterPanino]

Normalerweise ist die Reihenfolge beim Programmstart beim Anzeigen eines Formulars:

Delphi-Quellcode:

OnCreate
OnShow
OnPaint
OnActivate
OnResize

Wenn das Programm aber mehrere Formulare besitzt, so werden diese in der Reihenfolge erzeugt, wie sie in der Project-Datei stehen:

Delphi-Quellcode:

program MeinProgramm;

uses
  Forms,
  Main in 'Main.pas' {Form1},
  Rain in 'Rain.pas' {Form2},
  Pain in 'Pain.pas' {Form3};
  
{$R *.res}

begin
  Application.CreateForm(TForm1, Form1);
  Application.CreateForm(TForm2, Form2);
  Application.CreateForm(TForm3, Form3);  
  Application.Run;
end.

Nun meine Frage: Kann man absolut ausschließen, dass etwa das Ereignis Form1.OnShow VOR Form2.OnCreate auftritt? Oder anders ausgedrückt: Müssen zuerst alle Formulare erzeugt werden, bevor das Ereignis OnShow eines Formulars eintritt, oder kann das Ereignis OnShow eines Formulars eintreten, bevor ALLE annderen Formulare erzeugt wurden?

[mkinzler]

Diev mwißten Events (außer onCreate) werden erst ausgelöst, wenn die Eventsloop des Application-Objekts aktiv ist, also anch Application.Run. Deshalb ist es sichergestellet das alle Formulare erzeugt sind, bevor eine Form sichtbar wird.

[SirThornberry]

das trifft nicht ganz zu. Ein Beispiel sind die Splashscreens. Oder wenn du vor Application.Run mit ShowModal ein Formular öffnest werden auch Messages abgearbeitet.
Ich würde versuche das ganze "sauberer" zu lösen und nicht darauf hoffen das niemals eine Message vorher abgearbeitet wird.

[mkinzler]

Zitat:

das trifft nicht ganz zu. Ein Beispiel sind die Splashscreens. Oder wenn du vor Application.Run mit ShowModal ein Formular öffnest werden auch Messages abgearbeitet.

In seinem Quelltext oben, sollte dies aber nicht passieren.

[PeterPanino]

Zuerst mal vielen Dank an alle für die Antworten!

Zitat von SirThornberry:

Ich würde versuche das ganze "sauberer" zu lösen und nicht darauf hoffen das niemals eine Message vorher abgearbeitet wird.

Heißt das also, wenn ich ganz sicher gehen will, dann sollte ich in der Project-Datei VOR allen Form.Create-Aufrufen die Routine einfügen, von der ich sichergehen will, dass sie vor allem anderen Code ausgeführt werden soll:

Delphi-Quellcode:

program MeinProgramm;

uses
  Forms,
  MyUnit,
  Main in 'Main.pas' {Form1},
  Rain in 'Rain.pas' {Form2},
  Pain in 'Pain.pas' {Form3};
 
{$R *.res}

begin
  DoThisBeforeEverythingElse;
  Application.CreateForm(TForm1, Form1);
  Application.CreateForm(TForm2, Form2);
  Application.CreateForm(TForm3, Form3); 
  Application.Run;
end.

[mkinzler]

Zitat:

Heißt das also, wenn ich ganz sicher gehen will, dann sollte ich in der Project-Datei VOR allen Form.Create-Aufrufen die Routine einfügen, von der ich sichergehen will, dass sie vor allem anderen Code ausgeführt werden soll:

Nein Nach dem Create der entsprecheneden Form aber vor den Create der anderen.

[MPirnstill]

Hi,

bin mir jetzt nicht ganz sicher, aber wäre hier nicht der Initialization Teil der Projektdatei, um etwas ganz zu Beginn des Projektes auszuführen?!

Gruß

[mkinzler]

Es kommt darauf an, was er machen will, ist der Code ein Teil einer Form, muß diese natürlich erst Instantiiert sein.