Re: [delphi-br] Qtde linha arquivo txt

2006-07-17 Por tôpico Emerson Cassio
Antes de começar o looping atribuindo a X o valor 1 como está na rotina abaixo, já resolve esse problema. - Original Message - From: Alex - Yahoo To: delphi-br@yahoogrupos.com.br Sent: Monday, July 17, 2006 4:41 PM Subject: Re: [delphi-br] Qtde linha arquivo txt Eu tentei

Re: [delphi-br] Qtde linha arquivo txt

2006-07-17 Por tôpico Alex - Yahoo
@yahoogrupos.com.br Sent: Monday, July 17, 2006 3:12 PM Subject: Res: [delphi-br] Qtde linha arquivo txt Var arq : TextFile; Linha : String; x : Integer; Begin AssignFile(arq,'nome_do_arquivo.txt'); Reset(arq); ReadLn(arq,Linha); x:=1;

Res: [delphi-br] Qtde linha arquivo txt

2006-07-17 Por tôpico Francisco Carlos de Andrade
sefile(arq); ---Mensagem original--- De: Luis Data: 17/07/2006 14:28:08 Para: delphi-Br Assunto: [delphi-br] Qtde linha arquivo txt galera como faço para pegar a Qtde linhas arquivo texto? tenho um arquivo para importar com varias linhas e gostaria de saber a quantidade de linhas que contem nes

Re: [delphi-br] Qtde linha arquivo txt

2006-07-17 Por tôpico Emerson Cassio
nha ); end; CloseFile ( arq ); label1.Caption:=inttostr(numlinhas); end; Emerson Cassio - Original Message - From: Luis To: delphi-Br Sent: Monday, July 17, 2006 1:29 PM Subject: [delphi-br] Qtde linha arquivo txt galera como faço para pegar a Qtde linhas arquivo texto? tenho

[delphi-br] Qtde linha arquivo txt

2006-07-17 Por tôpico Luis
galera como faço para pegar a Qtde linhas arquivo texto? tenho um arquivo para importar com varias linhas e gostaria de saber a quantidade de linhas que contem neste arquivo texto? -- Grato pelo atenção Luís