Du wirst ein eigenes Protokoll dafür definieren müssen....
OnConnect, Client:
Clientsocket1.socket.sendtext('#NICKLIST');
Server erhält Nachricht "#NICKLIST"
Delphi-Quellcode:
for i:=0 to NickList.Count - 1 do
ServerSocket1.Socket.SendText('#NICKNAME: ' + NickList.Items[i]);
Client erhält Nachricht "#NICKNAME: ksngfskj"
Delphi-Quellcode:
if pos('#NICKNAME', Msg) > 0 then
NickListBox1.Items.Add(copy(Msg, 12, length(Msg) - 12);
Ist natürlich mehr Pseudocode denn funktionsfähiges Delphi...