VCL: Dll-Fenster schließt mir die Hauptanwendung

[Der schöne Günther]

Szenario:

• VCL-Anwendung mit einer Dll.
• Die DLL ist ebenfalls mit Delphi kompiliert und bietet ein Kommando an das ein VCL-Fenster erzeugt und anzeigt.
• Schließt man das DLL-Fenster wird die gesamte Anwendung beendet!

Das DLL-Fenster wird so erzeugt:

Delphi-Quellcode:

   Application.CreateForm(TTestForm, newForm);
   newForm.Show();

Erzeugt man das Formular so:

Delphi-Quellcode:

   newForm := TTestForm.Create(nil);
   newForm.Show();

ist alles in Butter: Schließt man das DLL-Fenster läuft die Hauptanwendung normal weiter.

Warum ist das so? Frage ich in der Hauptanwendung nach Application.MainFormHandle ändert es sich nicht. Das scheint es schon mal nicht zu sein...

[Namenloser]

Das Application-Objekt der DLL und der Hauptanwendung sind vermutlich nicht dieselbe Instanz. Daher denkt die DLL, dass das letzte und einzige Fenster geschlossen wurde, und würgt das Programm anschließend ab. Vermute ich. Habe damit nie gearbeitet.

[Uwe Raabe]

Um das mal etwas zu verdeutlichen: Eine DLL bringt ihre eigene RTL und VCL/FMX Laufzeitumgebung mit, die sich von der des Hauptprogramms unterscheidet. Daher ist Application innerhalb der DLL eine ander Instanz als Application innerhalb der Exe. Will man in beiden Fällen dieselbe Instanz haben, muss man Packages verwenden.

[Sir Rufo]

Egal wer da was mitbringt oder nicht: Fakt ist, dass eine Form, die "denkt", dass sie die MainForm ist, beim Schließen Application.Terminate aufruft. Dort wird u.a. auch PostQuitMessage(0) aufgerufen und das sendet dann ein WM_QUIT an die Anwendung

Darum wird die Anwendung geschlossen, denn die Form in der DLL, denkt, sie sei eine MainForm

[Der schöne Günther]

Wahnsinn. Das heißt: Egal ob DLLs oder nicht- Hätte ich ein Nicht-VCL-Fenster mir selbst erzeugt würde das auch einfach mal geschlossen werden. Nett.

Ich glaube, ich gewöhne mir dieses schräge TApplication ganz ab...

[Sir Rufo]

Zitat von Der schöne Günther:

Wahnsinn. Das heißt: Egal ob DLLs oder nicht- Hätte ich ein Nicht-VCL-Fenster mir selbst erzeugt würde das auch einfach mal geschlossen werden. Nett.

Ich glaube, ich gewöhne mir dieses schräge TApplication ganz ab...

Wieso das denn?

Du darfst nur in einer DLL nicht mit TApplication herumspielen, dann wird alles gut.

[Uwe Raabe]

Zitat von Sir Rufo:

Zitat von Der schöne Günther:

Wahnsinn. Das heißt: Egal ob DLLs oder nicht- Hätte ich ein Nicht-VCL-Fenster mir selbst erzeugt würde das auch einfach mal geschlossen werden. Nett.

Ich glaube, ich gewöhne mir dieses schräge TApplication ganz ab...

Wieso das denn?

Du darfst nur in einer DLL nicht mit TApplication herumspielen, dann wird alles gut.

Bei einem Nicht-VCL-Fenster wäre ich mir da gar nicht so sicher, denn das würde TApplication und insbesondere TApplication.MainForm ja gar nicht kennen (das Application.Terminate kommt immerhin in TCustomForm.Close ).

Abgesehen davon ist es mit Delphi und allem was damit einher kommt wie mit jedem Werkzeug: man muss damit umzugehen wissen oder man muss es eben lernen.

[Sir Rufo]

Zitat von Uwe Raabe:

Zitat von Sir Rufo:

Zitat von Der schöne Günther:

Wahnsinn. Das heißt: Egal ob DLLs oder nicht- Hätte ich ein Nicht-VCL-Fenster mir selbst erzeugt würde das auch einfach mal geschlossen werden. Nett.

Ich glaube, ich gewöhne mir dieses schräge TApplication ganz ab...

Wieso das denn?

Du darfst nur in einer DLL nicht mit TApplication herumspielen, dann wird alles gut.

Bei einem Nicht-VCL-Fenster wäre ich mir da gar nicht so sicher, denn das würde TApplication und insbesondere TApplication.MainForm ja gar nicht kennen (das Application.Terminate kommt immerhin in TCustomForm.Close ).

Abgesehen davon ist es mit Delphi und allem was damit einher kommt wie mit jedem Werkzeug: man muss damit umzugehen wissen oder man muss es eben lernen.

Da war mir der Bezug, wo denn die Nicht-VCL-Form erzeugt worden wäre hätten sollen nicht klar.

In der DLL? Da würde es auch reichen die Form nicht mit TApplication zu verbandeln.
In der Anwendung selber? Ja, dann fliegen alle Forms weg