Hi,

ich möchte unterschiedliche Threads in einer TList halten.

z.B.

markieren

Delphi-Quellcode:

ThreadA=class(TThread)
ThreadB=class(TThread)
ThreadC=class(TThread)

Die Thread tragen sich selbst beim Starten in eine TList ein und beim Beenden wieder aus.

Jetzt möchte ich bei Programmende alle noch verbliebenen Thread terminieren.

Allerdings kann ich wohl nicht mit as TThread arbeiten, denn die IDE bietet mir bei (TList.items[i] as TThread). kein Terminate an. Auch über die API function TerminateThread geht's zumindest nicht so einfach, weil ich dazu das Handle brauche.
Jetzt könnte ich natürlich auch das Händle in einer TList ablegen, aber mir gefiel dieser Weg erst mal besser, weil ich dann die TList auch noch anderweitig verwenden will.
Meine Frage, warum kann ich bei Threads nicht auf die Mutterklasse casten?
Welche elegante Lösung gibt es?

Gruß Hobbycoder

Zitat von Hobbycoder:

IDE bietet mir bei (TList.items[i] as TThread). kein Terminate an.

Uh, ganz sicher?

Zitat von Der schöne Günther:

Uh, ganz sicher?

Nun, wenn jemand Du diese Gegenfrage stellt......nicht mehr so ganz.

Aber der Compilert meckert mir das
    (TL.Items[0] as TThread).Terminate; //TL ist TList mal mit der Fehlermeldung

markieren

Code:

E2015: Operator ist auf diesen Operandentyp nicht anwendbar

Wobei er da nicht wegen dem Terminate, sondern wegen des AS meckert.

markieren

Delphi-Quellcode:

(TObject(TL.Items[0]) as TThread).Terminate;

TThread(TL.Items[0]).Terminate;

AS auf einen Pointer anstatt auf eine Objektvariable.

Pssst: TObjectList



Mit den Generics sieht das ganze auch ganz nett aus.

markieren

Delphi-Quellcode:

var TL: TList<TThread>;

TL.Items[0].Terminate;

TL[0].Terminate;

Delphis Compiler-Meldungen sind mal wieder super-hilfreich. Was er dir sagen möchte: Er kommt mit dem   (TL.Items[0] as TThread) nicht zurecht. Die TList gibt dir nur Pointer. Das könnte ein Zeiger auf alles sein. Und wenn es z.B. auf einen Integer (oder Müll im Speicher) zeigt kannst du darauf kein as machen.

Du musst entweder dem Compiler sagen "Ich weiß was ich tue, das ist garantiert ein Zeiger auf einen TThread" und somit:

TThread(TL.Items[0]).Terminate(); Oder du gehst von dieser schrecklichen TList weg und nimmst eine TList<TThread>

Wieder was gelernt.

Danke.