Gracias por su respuestas.
Les cuento que lo estoy haciendo con lazarus, como no tiene componentes de socket instale el Lnet que anda joya, pero como no soporta el componente threads tengo que hacer mis thread para manejar las conexiones.
Ahora me baje el pico, que ustedes me comentan y lo vere con mas detencion, parece interesante.
Lo que estoy haciendo es en el main.pas:
Código Delphi
[-]
procedure TForm1.Button1Click(Sender: TObject);
begin
tcp.Listen(1234, LADDR_ANY);
end;
Ahora lo que creo que tengo que hacer es en el onAccept:
Código Delphi
[-]
procedure TForm1.TcpAccept(aSocket: TLSocket);
begin
end;
Me imagino que ahi tendre que llamar a mi thread.create y pasarle como parametro el aSocket y mantener en el execute la conexion, no? no se si estoy errado.
Gracias