Chat Utilizando Winsocks (Delphi 7) - Tamanho

Pessoal,
boa tarde...
Estou desenvolvendo um Chat Server/Client em Delphi 7 e gostaria de sabe se existe alguma maneira de saber o tamanho (em bytes) da mensagens enviandas para eu exibir tanto no Cliente quanto no Servidor a quantidade de dados trafegados por eles...

Obrigado desde já