Para saber quantas linhas tem num memo, use a
propriedade Memo1.Lines.Count.
Voce pode saber, quantos caracteres somando os
"Length" de cada linha