Chat con Delphi

[mjjj]

Como ocupo los comando para enviar mensajes privados, y obtener la lista de usuarios conectados.

alguien me puede ayudar con el codigo porfa... gracias

[mjjj]

Hola... tengo una duda, lo que quiero hacer es que la aplicacion me genera una lista (Tlistbox), con todos los usuarios conectados.

Que esta se actualize cada vez que se conecta o desconecta algun usuario.

Una idea que se me ocurre es que en los eventos OnConnected y OnDisconected del TicsChatClient, llame al evento OnNicklist y tengo el siguiente codigo:

Código Delphi [-]
procedure TForm1.ChatClientNickList(Sender: TObject; UserList: TUserList);
var
  i: integer;
begin
  for i:=0 to UserList.Count-1 do listbox1.Items.Add(UserList.Users[i].Nick)
end;

El problema es que no se como llamar al evento OnNickList desde otro evento.

Se puede hacer esto?
Alguien se le ocurre alguna mejor idea?

Saludos

[Julián]

Puedes usar estos eventos:
OnJoinNick - te dice el username de alguien que ha entrao al chat
OnPartNick - te dice el username de alguien que se ha ido
OnChangeNick - Un usuario se ha cambiado el nombre

El evento OnNickList se produce como respuesta al envio del comando /list y tambien se recibe la primera vez que se establece la conexión.

Hay bastantes mas eventos, lo único que tienes que hacer es curiosear un poco, y ademas, también puedes mirar el código fuente. Y preguntar aquí, claro.

Un saludo!