Al recibir el texto (por ejemplo en el
OnRead) prueba las propiedades
LocalAdress y
RemoteAddres del parámetro
Socket.
Te lo digo de memoria con la documentación, porque no puedo probarlo ahora.
Aquí en el FTP del club, hay varios ejemplos de proyectos de Sockets, por si te sirven de ayuda.