La Web del Programador: Comunidad de Programadores
 
    Pregunta:  18325 - SOBRE LA COMUNICACIóN TCP/IP
Autor:  Pedro Mass
Quiero hacer un programa en Delphi para comunicaciones como si fuera un chat pero necesito saber dos cosas primero.
1- Como logro que mi programa atienda a todo aquel que se conecte a el de la manera más eficiente posible.
2- Como logro que el programa pueda comunicarse a traves de los cortafuegos que puedan encontrarse en medio.

No se como puedo hacer que usando los componentes de Delphi (tServerSocket) poder atender a todos los que se conecten a el.

En Visual Basic lo podia hacer cargando otra instancia del control con load y aceptando la demanda de conexión, pero ahora estoy aprendiendo Delphi y quiero trabajar con el.

Estoy muy agradecido de la información que me puedan dar.

  Respuesta:  Gandazgul Mirth
Hola

El objeto ServerSocket tiene una propiedad que se llama Socket y dentro de esta un arra de conecciones asi que:

ServerSocket1.Socket.Connetions[No. de coneccion]

de esta forma accedes a cada una de las conecciones, la primera es 0 la segunda 1 y asi sucesivamente si alguna se desconecta la lista se corre o sea 3 pasa a ser 2 y asi.

Espero te sirva de ayuda si tienes dudas responde tu mismo esta pregunta y perguntame la duda.

chao.

  Respuesta:  Luis Flores
Hay un ejemplo en Delphi. en el directorio bin: scktsrvr.exe

Me parece que si esta el código fuente de este programa que acepta múltiples conexiones, lo que no recuerdo es donde.
Y está la ayuda de MSDK Help File sobre los Sockets y vienen ejemplos.

También en la ayuda de Delphi viene como utilizar estos componentes.

Espero que esto te de por donde empezar.

LUIS