TServerSocket Connections[x]

[Muetze1]

Moin!

Auf meiner HP liegt ein kleiner Chat rum auf Basis von TClientSocket/TServerSocket. Dort habe ich eine kleine Klasse angelegt pro Benutzer die sich dann den Socket aufnimmt (also die Instanzen Adresse) und darüber kann ich dann leicht die Benutzer zuordnen etc . Die Benutzer-Klasseninstanzen werden in einer eigenen TObjectList Ableitung gehalten die dann auch z.B. Funktionen bietet an alle Nutzer zu senden (alle enthaltenen Instanzen durchlaufen und den Socket haben dann ja die einzelnen Instanzen). Eintragen der Instanz bei OnClientConnect und austragen bei OnClientDisconnect. Klappt wunderbar. Ansonsten einfach mal auf eine HP gehen (Delphi->Projekte) und mal anschauen...

MfG
Muetze1