TEvent.free im Thread Destructor?

[Peter666]

Probiers mal so:

Code:

destructor TMyThread.Destroy;
begin
 Terminate;
 FMyEvent.SetEvent;
 WaitFor;
 FMyEvent.free;
 inherited;
end;