Ayuda con programa de chat en delphi

[lag_0]

Buenas,

La manera más facil es que lo hagas apartir de añadir, por ejemplo, identificadores en las cadenas, que cuando el cliente seleccione un "nick" se mande %%nick%%-mensaje, y al llegar a tu servidor pues busque la ip de el nick y mande el mensaje... No es tarea muy complicada.

Respecto a lo de la lista de usuarios... lo mismo, que al conectar un usuario el servidor lo añada a una lista y mande la de los otros usuarios al nuevo cliente...

Un saludo y espero ayudarte...

[zanyodark]

Gracias por tu ayuda, lo voy a implementar.

[lag_0]

De nada =) mucha suerte.

[zanyodark]

disculpen, aa como puedo ver la ip de los clientes conectados al servidor desde el servidor claro, algun código?

[lag_0]

Supongo que utilizarás TServer socket y tu delphi será < delphi 7, así que intenta con:

ServerSocket1.Socket.Connections[numerodecliente].RemoteAddress

[zanyodark]

Hola, muchas gracias, sabia que era remote address pero lo estaba usando mal jejeje, diablos que tonto me siento, pero muchas gracias de todos formas si funcionoj ejeje ya logre hacer la lista de ip's, que la utilizare para mandar el mensaje directo segun el cliente decida,pero hay algo que no he podido hacer, como puedo realizar la lista del nick que escogen los clientes, le he intentado de varios modos pero no me sale, intente que al momento de que eligieran el nick, se mandara al servidor el nick con Clientsocket1.socket.sendtext(nickname) oviamente nickname es la variable que reserve para los nombre de usuarios, pero si no tiene caso esto no funciona, que me recomiendan para hacer eso de la lista con nombre de usuario, algun código? please, y luego como se mandaria la lista con puros nicknames de los usuarios conectados al servidor? agradecería mucho.