Delphi - SOCKETS

Tengo una aplicación cliente/servidor comunicadas a través de sockets, por ejemplo, si envio mensaje 1 al servidor, este me regresa mensaje 1, pero cuando envio los mensajes dentro de un bucle, el servidor me retorna lo siguiente:
mensaje1
mensaje2mensaje3mensaje4...mensajen
Alguien tiene idea de por que ocurre esto? conozco muy poco sobre estos componentes y me urge mucho solucionar este problema, en ocasione aparece algo como esto, Asynchronous socket error 10054