Hi,
im FormCloseQuery frage ich meine Objectlist ab, on moch Thread vorhanden sind und wenn ja sollen diese sofort beendet werden.
Delphi-Quellcode:
if FThread_liste.Count <> 0 then Begin
for i := 0 to FThread_liste.Count -1 do begin
if Assigned((FThread_liste.Items[i] as TThread)) then
(FThread_liste.Items[i] as TThread).Terminate;
end;
End;
Allerdings alufen die Threads einfach munter weiter.