Ende eines Threads dem Main-Thread mitteilen

[SirThornberry]

naja, du könntest dem OnTerminate eine Methode des Hauptfensters zuweisen. Ich habs in der Regel so gemacht.

Delphi-Quellcode:

type
  TMyThread = class(TThred)
  protected
    procedure Execute; override;
  public
    OnFertig: TNotifyEvent;
  end;
[...]
procedure TMyThread.Execute;
begin
  //do something until terminted
  if Assigned(OnFertig) then OnFertig(Self);
end;
{============================================}
[...]
var LThread: TMyThread;
begin
  LThread := TMYThread.Create(True);
  LThread.OnFertig := FThreadFertigProc;
  LThread.Resume;
end;

procedure TForm1.FThreadFertigProc;
begin
  //das machen was halt passieren soll wenn der Thread fertig ist
end;