Client Disconnecten

[Pseudemys Nelsoni]

hi,

ich versauche von meinem tserversocket aus einen client nach dem schreiben zu disconnecten, aber irgendwie geht das nicht...

so sieht ja der rumpf normal aus:

Delphi-Quellcode:

procedure TServerSocket1ClientRead(Sender: TObject; Socket: TCustomWinSocket);
var

so das "Socket" bezieht sich ja nicht auf meinen serversocket sondern den des clients... wie komm ich nun aber dazu den client diszuconnecten? wenn ich : "self." versuche bekomme ich hinter dem "." kein "Socket"....

[Pseudemys Nelsoni]

hab schon, bye