Se você está utilizando o Delphi 7 (conforme a tag), basta medir utilizando o método Length
e ele vai lhe dar o tamanho em Bytes.
Mas isso logo pode lhe causar problemas caso atualize seu Delphi para uma versão que utiliza Unicode. Um meio que estaria a prova de atualizações é utilizar Length(S) * SizeOf(Char)
que também lhe dará o valor em bytes.
Exemplo de código abaixo:
function TamanhoEmBytes(Const strAMedir: String): integer;
begin
Result := Length(S) * SizeOf(Char);
end;
Mais sobre o assunto:
http://edn.embarcadero.com/article/38693
https://stackoverflow.com/questions/16529992/delphi-unicode-string-length-in-bytes