@baumina
Wenn du eine kleine Änderung vornimmst
Delphi-Quellcode:
destructor TLivedataThread.Destroy;
begin
Terminate;
EventWait.SetEvent;
inherited;
EventWait.Free;
end;
dann reicht ein simples
FreeAndNil( LiveDataThread );
bzw. wenn man die
protected
Methode
TThread.TerminatedSet
überschreibt mit
Delphi-Quellcode:
procedure TLivedateThread.TerminatedSet;
begin
inherited;
EventWait.SetEvent;
end;
destructor TLivedataThread.Destroy;
begin
inherited;
EventWait.Free;
end;
dann wird es noch weniger Code
Kaum macht man's richtig - schon funktioniert's
Zertifikat: Sir Rufo (Fingerprint: ea 0a 4c 14 0d b6 3a a4 c1 c5 b9
dc 90 9d f0 e9 de 13 da 60)