Contagem de Caracteres em Arquivo

09/01/2006

Alguém tem uma rotina para contar os caracteres (inclusive espaços) de um arquivo .txt?

obrigado


Valdirdill

Respostas

09/01/2006

Edilcimar

for i := 0 to memo1.lines.count -1 do
cont := cont + length(memo1.lines[i])


Responder Citar

09/01/2006

Valdirdill

Obrigado


Responder Citar