AThread.WaitFor gibt Fehler "Das Thread Handle ist ungültig"

[Klaus01]

Hallo,

Delphi-Quellcode:

//Gibt dem Benutzer die Möglichkeit, den Thread zu Beenden
procedure TForm1.Button2Click(Sender: TObject);
begin
  if Assigned(AThread) then
  begin
    AThread.Terminate;  // hier wird der Thread auf nil gesetzt, siehe Deine OnTerminate Routine 
    AThread.WaitFor; //Hier fehler!
  end;

  //Hier steht noch Code, der erst ausgeführt werden darf, wenn AThread beendet ist.
end;

Noch eine Anmerkung, Du bekommst nicht mit wenn Dein Thread "normal" terminiert.

Grüße
Klaus

Grüße
Klaus