Prozess bei laufenden Thread beenden

[hoika]

Hallo,
ich habe hier einen Thread, der wartet nicht auf ein Windows-Kernel-Object,
sondern läuft einfach über das übliche in TMyThread.Execute

while not Terminated do ...

Ich hatte mal gelesen, dass der eigentliche Prozess nicht beendet wird,
wenn noch ein Thread läuft.

Das ist scheinbar nicht so, sagt auch die WinAPI von MS (siehe oben).


Kann ich also davon ausgehen, dass mein laufender Thread beim Programmende nicht das Programm blockiert?

[himitsu]

Ja, ein Prozess wird beendet, wenn irgendein Thread mit einer Exception bis zum Windows durch rauscht.

Darum hat TThread auch intern ein Try-Except um das Execute, siehe ThreadProc in System.Classes.
Über Thread.FatalException kommt man im OnTerminate, DoTerminate oder im Destroy (vor Inherited) da dran.


Ebenso hat die VCL deswegen um die meisten Events/Ereignisse ein Try-Except drumrum.
(nur bei Konsolenanwendungen, muß man es selber machen, aber darum enthält deren Codevorlage auch ein Try-Except)




Davon ausgehen: Nein, ähhh ja :lol:

Der Prozess wird geschlossen, wenn alle Threads beendet sind,
aber der Delphi-Hauptthread ruft am Ende ein Halt aka TerminateProcess auf und schießt ALLES brutal ab. :duck:

[hoika]

Hallo,
schießt ALLES brutal ab

OK, das ist ja gemein ;)

[Der schöne Günther]

Zitat:

When you exit a VCL application, the background threads are just killed off. The application does not wait for them, it just ends. If you want to wait for them, you will have to write the code yourself.

A VCL application, however, will wait (for all eternity, if necessary) for all the tasks that were put in the default thread pool (System.Threading.TThreadPool.Default).

Quelle: https://stackoverflow.com/a/51384481