Thread soll eine Minute warten: Sleep oder Timer?

[sirius]

In einem Thread ist sleep nutzbar (nur auf Terminate sollte man achten). Besser ist waitforsingleobject mit einer Zeitangabe.

Edit:
Waitforsingleobject irgendwie so:

Delphi-Quellcode:

constructor Tmythread.Create(CreateSuspended: Boolean);
begin
  inherited Create(false);
  FEvent:=TEvent.Create(nil,true,false,'');
end;

destructor Tmythread.Destroy;
begin
  FEvent.Free;
  inherited;
end;

procedure Tmythread.DoSomething;
begin
  //abstract  ;-)
end;

procedure Tmythread.Terminate;
begin
  inherited;
  FEvent.SetEvent;
end;

procedure Tmythread.execute;
begin
  while not terminated do
  begin
    DoSomething;
    FEvent.ResetEvent;
    FEvent.WaitFor(10000);
  end;
end;