Como saber quantidade de linhas de um arquivo de texto?

Question

Como posso saber a quantidade de linhas de um arquivo de texto atrav�s do delphi???...

Motta · Answer

de um loadfromfile em uma Tstrings e veja o count ...acho que funciona...

Emir Neto · Answer

Tem como detalhar isso???...

Rjun · Answer

[code:1:8a6aead219]var  Arquivo: TStringList;begin  Arquivo := TStringList.Create;  try    Arquivo := LoadFromFile(NomeArquivo);    ShowMessage(�Numero de Linhas: � + IntToStr(Arquivo.Count - 1));  finally    FreeAndNil(Arquivo);  end;end;[/code:1:8a6aead219]...

Emir Neto · Answer

var
Arquivo: TStringList;
begin
Arquivo := TStringList.Create;
try

[color=red:fa6fc99ba4]Esta linha indica erro no LoadFromFile, visto que este procedimento precisa de algo antecessor.[/color:fa6fc99ba4]

Arquivo := LoadFromFile(NomeArquivo);

ShowMessage(�Numero de Linhas: � + IntToStr(Arquivo.Count - 1));
finally
FreeAndNil(Arquivo);
end;
end;

Rjun · Answer

Foi mal. Coloque a sintaxe errada. [code:1:67ef8abf6f]Arquivo.LoadFromFile(NomeArquivo);[/code:1:67ef8abf6f]...

F�rum Como saber quantidade de linhas de um arquivo de texto? #290166