Gelöscht

Es gibt nur zwei Möglichkeiten:
Entweder FreeOnTerminate oder eine externe Variable, die noch auf das Threadobjekt zugreift. Beides geht nicht, da du nie weißt wann der Pointer durch die Freigabe schon ungültig ist.

Was stattdessen sinnvoll ist, lässt sich so nicht sagen, dafür müsstest du genauer erklären was du damit bezweckst. Eine Möglichkeit wäre das Event OnTerminate des Threads zu benutzen.

Gelöscht

Moin!

Wie jaenicke schon vorgeschlagen hat, dürfte die einfachste Version sein:

• Thread beim Erzeugen in eine Liste stellen
  
• Beim OnTerminate des Threads diesen wieder aus der Liste entfernen

Damit sind nur Threads in der Liste, die noch "leben".

cu
Narses

Zitat:

Was ich erreichen möchte ist, dass ich den Thread durch klicken auf einen Button Pausieren / Resumen kann.

... aber nicht mit Suspend und Resume sondern über eine Flagvariable des Threads die von außen gesetzt wird und damit der abzuarbeitende Code übersprungen wird. Der Thread läuft zwar aber tut nix. Suspend und Resume kann manchmal komische Effekte hervorrufen weil man den Thread nicht zu einem definierten Zustand anhällt. Siehe hier: www.delphipraxis.net...sume-deprecated.html

Ich werfe mal noch die Stichwörter Threadpool und Workerthread in den Raum.

Da gibt es drüben in der Delphipraxis auch umfangreiche Implementierungen, die du einfach benutzen kannst, z.B. diese:
www.delphipraxis.net...-delphi-2010-xe.html
(auf Anhieb die gefunden, da gab es aber auch andere...)

Gelöscht

Statt einer reinen Flagvariablen kann man auch mit Events arbeiten. Das lässt sich prinzipiell genauso verwenden, aber ist threadsicher und man kann gezielt darauf warten, der Thread muss also nicht pollen. Zudem kann man allen Threads noch ein weiteres Event verpassen, mit dem alle abgebrochen werden (z.B. Programmende).
Stichworte: CreateEvent, SetEvent, WaitForSingleObject, WaitForMultipleObjects