Threads Suspend -> Resume ... wo gehts weiter?

[Luckie]

In Delphi in a nutshell steht, dass wenn man den Konstruktor überschreibt, man die Thread-Instanz im Angehaltenenzustand erzeugen soll, damit er nicht schon los läuft bevor alles initialisiert wurde.

Sähe dann so aus:

Delphi-Quellcode:

constructor TSomeThread(Param1, Param2: TFoobar; OnTerminate: TNotifyEvent);
begin
  inherited Create(True);  // create suspended
  
  Self.OnTermiante = OnTerminate;
  FreeOnTerminate := True;

  Resume;  // und Thread starten
end;