[Delfino]

O puedes usar el componente TIdLogEvent y conectarlo con el componente TIdTCPClient para hacer uso de los eventos OnReceive y OnSend q tiene, para asociarlo se hace asi :

Código Delphi [-]
TCPClient.IOHandler.Intercept := LogEvent;