Numero de Linhas

Delphi

16/02/2004

alguem sabe de alguma funcao q me retorne o numero de linhas de um arquivo texto?

estou importando um arquivo texto para uma DB e queria fazer uma barra de progresso, visto q ele eh grande.


Gods

Gods

Curtidas 0

Respostas

Gods

Gods

16/02/2004

eu podia carregar o txt num RichEdit e dar um length(RichEdit.Lines.Text)
mas o txt eh grande e ja demora na importacao, ficar carregando ele tb tah por fora


GOSTEI 0
Lucas Silva

Lucas Silva

16/02/2004

var lista: TStringList;
begin
 lista.loadfromfile(´nome do arquivo´);
 ShowMessage(IntToStr(Lista.Count));
end;



GOSTEI 0
POSTAR