Cliente/Servidor de Mensajeria Instantania

[fide_uci]

Hola amigos.

La cosa es que necesito hacer un servidor de mensajeria instantania para poder chatiar con mi novia, que se encuentra en la misma red de area local. Pero lo que pasa que que es necesario que lo haga yo para facilitarle a ella las cosas ya que no sabe nada de nada, y ademas el programa debe tener ciertas caracteristicas que solo ella y yo usaremos. Gggg.

Bueno lo que necesito que me digan es mas o menos el procedimiento a seguir para implementar un servidor al cual se puedan conectar muchos clientes y resivir mensajes tantos publicos como provador.

[Neftali [Germán.Estévez]]

Supongo que ya sabes que hay cientos de programas de este tipo. La mayoría gratuítos. Algunos de ellos en Delphi y con fuentes. Asummiendo que ya sabes esto y que aun así deseas hacer tu programa, te recomiendo que revises la carpeta de Demos que viene con Delphi, ya que allí tienes un ejemplo de un Chat.

Deberías revisar los componentes de las Indy para Cliente y Servidor.

[fide_uci]

Bueno neftali ante todo muchas gracias por responder a mi pregunta. Es cierto todo eso que dices, pero no se si me vas a entender !

Nunca has querido hacer algo tu mismo desde 0, sin nada de nada, comenzandolo todo tu?
Esos es un deseo que tengo hace ya bastante tiempo y es sobre este tema.

He comenzado a trabajar usando los componentes de la Indy 9, el idTCPClient e idTCPServer respectivamente. Pero necesito que me den mas o menos la logica de como es que se hace esto.

Por ejemplo algo asi.

El Cliente se conecta.
El servidor envia el comando GetUserInfo.
El cliente recoje la informacion del usuario y se la envia al servidor.
bla bla bla....

Ya entiedes?
Estas cosas son las que me hacen falta, la logica de como hacerlo !
En realidad el mayor problema es para actualizar la lista de usuarios que hay en el servidor. Eso es lo que no he logrado hacer aun.

[Neftali [Germán.Estévez]]

Empezado por fide_uci

Nunca has querido hacer algo tu mismo desde 0, sin nada de nada, comenzandolo todo tu?
Esos es un deseo que tengo hace ya bastante tiempo y es sobre este tema.

Me ha pasado muchas veces. Sólo quería confirmar que realmente era así.

[Neftali [Germán.Estévez]]

Empezado por fide_uci

He comenzado a trabajar usando los componentes de la Indy 9, el idTCPClient e idTCPServer respectivamente. Pero necesito que me den mas o menos la logica de como es que se hace esto.

Arranca el Servidor y realiza el Open.
Al arrancar los clientes realiza el Open.

Con eso ya tienes la conexión.
Programa el OnClientConnect y OnClientDisconnect para controlar los clientes conectados; Aquí puedes utilizar las propiedades RemoteHost y RemoteAddress (revisa qué valores tienen).
A partir de ahí se trata de ir añadiendo cosas.

Para enviar un texto desde un cliente utiliza el SendText.

Código Delphi [-]
    ClientSocket1.Socket.SendText(edtTexto.Text);

Y para recibirlo desde el Servidor programa los eventos ClientRead/ClientWrite (para ambas operaciones).

Espero que te sirva para empezar.
Un saludo.

[duranguenze]

Hace ya varios años hice uno, pero en otro lenguaje, usando los indi te facilita bastante, no hay necesidad de tener un servidor por asi decirlo, creas un programa el cual haga el papel de cliente y de servidor, este lo pones a escuchar un puerto pre establecido, y le dices que cheque todas las terminales para ver si el puerto esta a la escucha, si lo esta entonces que se presente.

Dicho de otro modo, inicia el programa, pregunta a todas las terminales si esta activo, si no esta entonces se pone a escuchar, cuando hace la conexion crea un nuevo socket en un puerto que este disponible, y a travez de este se hace el dialogo entre las personas, el puerto que esta a la escucha o por donde le hablan solo es para hacer la conexion, aparte de este puerto se abren otros dos, uno para el dialogo entre las personas y otro para los comandos.

Espero que te sea sencilla la explicacion de manera general.