FormDestroy wird nicht aufgerufen (MainForm)

[Alex_ITA01]

Hallo zusammen,
ich habe ein komisches Phänomen.

Ich habe zwei relativ große Anwendungen mit sehr vielen Formularen, Threads usw.

Eine der beiden Anwendungen kann ich ganz "normal" beenden (FormDestroy wird aufgerufen).

Bei der zweiten Anwendung habe ich das Problem, dass das FormDestroy der MainForm nicht aufgerufen wird. Ich habe mir BreakPoints ins FormClose und FormDestroy rein gemacht und ins FormClose kommt er rein aber ins FormDestroy nicht. Ich habe mich auch bisschen durch die Forms.pas debuggt und da wird auch Application.Terminate aufgerufen. In der Projektdatei, wo alle Units (Formulare) erstellt werden, lande ich auch hinter Application.Run wenn ich die Anwendung runter fahre.

Hat jemand eine Idee, was das sein kann bzw. was ich noch testen kann?
Die Anwendungen sind leider zu groß, um diese hier darstellen zu können. Bei neu erstellten Anwendungen funktioniert es aber bei dieser einen nicht. Vielleicht hat jemand ein Tip, was ich noch kontrollieren kann/soll. Ich vermute irgendwie das das eine Einstellung im Projekt ist und nicht am Quelltext liegt?!

Gruß

[Bernhard Geyer]

Laufen noch Threads? Könnte sein das diese hier querschießen/stören.

[Alex_ITA01]

Nein, diese werden alle beendet und freigegeben.

[TiGü]

Zitat:

Zitat von Alex_ITA01 (Beitrag 1204255)

Bei der zweiten Anwendung habe ich das Problem, dass das FormDestroy der MainForm nicht aufgerufen wird. Ich habe mir BreakPoints ins FormClose und FormDestroy rein gemacht und ins FormClose kommt er rein aber ins FormDestroy nicht.

Ist das Event im OnDestroy der Form eingetragen?

[Alex_ITA01]

Ja ist es :-)

Habe jetzt mal das FreeAndNil für alle Threads rausgenommen (beim Beenden) und dann wird das FormDestroy auch aufgerufen...
Muss jetzt mal rausfinden, welcher Thread beim Freigeben und Nil setzen dazu führt, dass FormDestroy nicht mehr aufgerufen wird.

[Bernhard Geyer]

Zitat:

Zitat von Alex_ITA01 (Beitrag 1204264)

Habe jetzt mal das FreeAndNil für alle Threads rausgenommen (beim Beenden) und dann wird das FormDestroy auch aufgerufen...

Du musst Threads Terminieren lassen. Wenn du sie nur rauskickst weiß ich nicht ob das gesund für die Anwendung ist.

[Alex_ITA01]

ja mache ich so. Ich sage erst Terminate und dann warte ich auf Beendung und dann erst das FreeAndNil.

Ich muss mich da mal reindebuggen welcher Thread den "Fehler" verursacht

[Bernhard Geyer]

Wie ist FreeOnTerminate für die Threads gesetzt?

[Alex_ITA01]

Es werden alle Threads mit ".Terminate" beendet und dann gewartet, dass sich alle als Beendet melden. Dann werden nur die Threads mit FreeAndNil aufgerufen, welche "FreeOnTerminate" = False haben (frage hierzu den Property ab, da diese Eigenschaft an einer anderen Stelle (im Thread selber) gesetzt wurde).
Müsste so in Ordnung sein...

[mentaltec]

Zitat:

Zitat von Alex_ITA01 (Beitrag 1204278)

nur die Threads mit FreeAndNil aufgerufen, welche "FreeOnTerminate" = False haben

Du frags sicherlich das "FreeOnTerminate" ab bevor Du die Threads terminierst ?

[Alex_ITA01]

Warum?
Terminieren soll doch jeder nur das Freigeben wird doch über FreeOnTerminate gesteuert und ich gebe eben nur die frei, die auch FreeOnTerminate = False haben.

Gruß

[mentaltec]

weil ein Thread bzw. Thread-Object mit FreeOnTerminate nach dem Terminate nicht mehr existieren muss, also sollte man ihn (TThread) dann nicht mehr nach seinen Eigenschaften fragen

allerdings bin ich mir garnicht sicher, ob ein nichtterminierter Thread das Schliessen des Mainforms verhindern kann

mfg

[Alex_ITA01]

ok stimmt aber ich Frage natürlich auch auf Assigned ab, bevor ich das FreeOnTerminate abfrage...

[mentaltec]

reicht nich : das heisst FreeOnTerminate und leider nicht FreeAndNilOnTerminate

[Alex_ITA01]

sorry das verstehe ich nicht.
Ich sage allen Threads ".Terminate" und warte dann auf deren Beendung.
Danach gehe ich alle Threads die Assigned sind durch und prüfe die Eigenschaft "FreeOnTerminate" und nur die, wo diese Eigenschaft auf "False" steht, gebe ich mit FreeAndNil frei...

Gruß

[HHennig]

Zitat:

sorry das verstehe ich nicht.
Ich sage allen Threads ".Terminate" und warte dann auf deren Beendung.
Danach gehe ich alle Threads die Assigned sind durch und prüfe die Eigenschaft "FreeOnTerminate" und nur die, wo diese Eigenschaft auf "False" steht, gebe ich mit FreeAndNil frei...

Hallo,
was mentaltec sagen wollte, ist Folgendes: Wenn der Thread mit eingeschaltetem "FreeOnTerminate" terminiert, zerstört er sich zwar selbst, aber die Objektvariable ist nicht automatisch nil!
D. h., Assigned() kommt mit True zurück, aber du hast kein zugehöriges Objekt mehr.

Du solltest die Eigenschaft "FreeOnTerminate" vor dem Terminate-Aufruf der Threads abfragen und nur die nicht 'automatischen' Threads nach Terminate auch freigeben, alle anderen existieren nach Terminate gar nicht mehr.

Du hast weiter oben gesagt, wenn du die Threads nicht freigibst, wird FormDestroy aufgerufen. Es scheint also irgendeiner deiner Threads nicht auf Terminate zu reagieren, dieser blokiert den Ablauf beim Beenden/Zerstören der Forms und du wartest nun evtl. unendlich auf ihn.

Du könntest mal jedem Thread eine kleine Prozedur bei OnTerminate verpassen, die z. B. nur ein ShowMessage('Terminiere Thread xx'); aufführt. Sollte gehen, da OnTerminate meines Wissen bereits wieder im Kontext des Mainthreads (VCL) ausgeführt wird.
Derjenige, der sich nicht meldet hat verloren... :)