Thread aus Tobjectlist beenden

[Sir Rufo]

Den Code kann man auch so schreiben

Delphi-Quellcode:

// OwnsObjects sollte True sein
FThread_liste.Clear;

Zitat von youuu:

Delphi-Quellcode:

while not (FThread_liste.Items[i] as TThread).Terminated do
  Delay(200);

[dcc32 Fehler] Form_Main.pas(1662): E2362 Auf protected-Symbol TThread.Terminated kann nicht zugegriffen werden

Hm

Die Threads und nicht die Thread-Liste sollen ja auch das Terminated auswerten.
Der Code zeigt allerdings auch, dass du das eben nicht machst, da du augenscheinlich nicht weißt, wo und wozu man das benutzt.

Delphi-Quellcode:

procedure TMyThread.Execute;
begin
  inherited;
  while not Terminted do
  begin
    // tue was hier immer wieder ohne Unterlass, ok bis eben Terminated
  end;
end;