Freigeben eines suspended Threads

[UliBru]

Yep, bin da auch eben dahintergekommen. Also es klappt sauber mit

Delphi-Quellcode:

  if (myThread <> nil) then
  begin
    if not myThread.Suspended then
    begin
      myThread.Terminate;
      while not myThread.Finished do
        sleep(10);
    end
    else
    begin
      myThread.FreeOnTerminate := false;  //  <-------- hinzugefügt
      myThread.Free;
    end;
  end;

Danke.