Warum werde ich disconnectet?

[Pseudemys Nelsoni]

moin,

ich habe einen server geschrieben, wenn ich jetzt connecte(als client), und darauf hin noch ein anderer verbindet und wieder disconnectet, disconnectet der server mich gleich mit, weiss jemand warum?

so sieht der teil aus den ich habe:

Delphi-Quellcode:

            ASocket.SendText(Format('ERROR :Closing Link: %s[%s] (%0:s)', [ConArray[i].nick, ASocket.RemoteHost]) + #13#10);
            Socket.Disconnect(ASocket.SocketHandle);
            FreeUserData(i);
            exit;

eigentlich dürfte er doch nur denjenigen disconnecten der auch disconnecten möchte oder?


Übrigens: Socket = Server, ASocket = Client

[Kedariodakon]

Du Disconnectest glaub ich den Server und nicht den Client.

Versuch mal sowas wie

Delphi-Quellcode:

 Asocket.Disconnect;

:gruebel:


bye

[Pseudemys Nelsoni]

hoi,

ne das klappt nicht, gibt eine zugriffsverletzung, mein disconnect muss schon richtig sein, wenn ich naemlich die verbindung trenne als client, kann ich auch direkt wieder drauf verbinden, d.h der server kann nicht offline sein

[UweR]

Hallo Pseudemys,

da bräuchte man etwas mehr Info. Welche Komponenten, wo (In welchem Event) wird dein Codeschnipsel aufgerufen und was verstehst du genau unter Server und Client wenn du meinst das Socket der Server und ASocket der Client ist.

[Pseudemys Nelsoni]

moin uwe,

hab schon rausgefunden was falsch war, ich musste den socket mit Socket.Close; schliessen ;) danke auch für deine hilfe.

btw: ich habe TServerSocket verwendet, ich benutze nie fremde kompos :thumb: