|
Registriert seit: 11. Nov 2003
Ort: Oldenburg
1.446 Beiträge
Delphi 10.2 Tokyo Enterprise
|
Re: TCPServer hängt sich nach Exception auf
28. Aug 2006, 11:17
Das Problem hatten wir schonmal glaub ich.
Hier die lösung du must im Ereignis OnBeforDisconnect erst alle Clients rauschmeisen
Frank
Tux sein Lieblingsquellcode
While anzfische<TuxSatt do begin
Fisch:=TFisch.Create; Tux.EssenFisch(Fisch); Fisch.Free;inc(anzfische); end;
|