Fórum Arquivo de Texto, Quantidade de Linha [Delphi] #492378

16/09/2014

0

Ola.
Preciso saber a quantidade de linha de um arquivo .TXT
Em media esse arquivo vai ter 420.000 Linhas

Pois quer colocar um Progres Bar para mostrar ao usuario quanto falta para terminar.

ha a possibilidade de fazer isso sem ter que percorrer o arquivo(Pois como disse, ele eh muito grande).


Obrigado.
Vanderlan Brandao

Vanderlan Brandao

Responder

Post mais votado

17/09/2014

Pode usar o StringList.

var
   arquivo : TStringList;
   numLinhas: Integer;
begin
   arquivo := TStringList.Create;
   arquivo.loadFromFile('C:\arquivo.txt');
   numLinhas := arquivo.Count;
end;

Wanderson Cortes

Wanderson Cortes
Responder

Gostei + 1

Mais Posts

17/09/2014

Vanderlan Brandao

Muito obrigado.

Deu certíssimo.

Vlw Abço.

Como coloco que esse tópico foi respondido??
Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar