Como saber quantas linhas tem um txt?

[Adalberto]

Bom dia de Deus a vocês
Necessito saber o tamanho, em linhas, de um arquivo .txt, ¿sabes de alguma função pra fazer isso?, Por favor, comparte comigo, muito obrigado.
Um grande abraço

[Pablo César]

Oi Adalberto,

Se no seu arquivo, o tamanho (em colunas) de cada linha for SEMPRE igual, você pode utilizar o MLCOUNT(), senão você vai precisar abiri em baixo nível com FOPEN() e varrer o arquivo localizando o chr(10)+chr(13), mais precisamente conhecido como LF.

Veja um exemplo com MEMOREAD e lendo o LF do exemplo do Maligno: viewtopic.php?f=1&t=6251&p=29317#p29317

Obs.: Engraçado, que neste preciso momento estava eu precisando de uma função assim. Mais do que nunca: acredito que ajudar aos outros é ajudar a si mesmo, também ! hihihi

[SandroBelarmino]

Uma outra forma é criar um dbf apenas com um campo caracter no tamanha da maior linha do arquivo texto e fazer um append from sdf para esse dbf. Como cada linha vai gerar um registros o numero de linhas será igual à quantidade de registros no arquivo.

Abraços.

[Maligno]

Uma outra forma é criar um dbf apenas com um campo caracter no tamanha da maior linha do arquivo texto e ...

Como descobrir qual é a maior linha de um arquivo texto, sem lê-lo?

Como cada linha vai gerar um registros o numero de linhas será igual à quantidade de registros no arquivo.

Não seria muito pra tão pouco? É só abrir o arquivo e contar os pares CR/LF.

[SandroBelarmino]

Como descobrir qual é a maior linha de um arquivo texto, sem lê-lo?

É, nesse caso fica um pouco (entenda-se bastante) difícil.... , não pensei na hipótese de não ter essa informação. Mas é um recurso que dá pra ser usado no caso de conhecer o arquivo texto, e que eu particularmente uso bastante, principalmente para ler arquivos de retorno de banco, que são arquivos que sempre terão um tamanho de linha específico.

De qualquer forma valeu.

Abraços.

[Adalberto]

Pablo, Sandro e maligno.

Fico agradecido com vocês pela ajuda oportuna que me distes.

Um grande abraço.

[Maligno]

eu particularmente uso bastante, principalmente para ler arquivos de retorno de banco, que são arquivos que sempre terão um tamanho de linha específico.

Quando sobrar um tempo (tá meio difícil ultimamente), vou disponibilizar meus fontes de tratamento de texto, onde se pode acessar as linhas individuais, como se fosse um DBF. Algumass funções:

Código: Selecionar todos

    txClose() - fecha o arquivo do texto ativo ou indicado
    txError() - informa qual o último erro registrado
  txGetLine() - lê uma linha inteira do texto ativo
    txLines() - informa a quantidade de linhas de um texto
   txMaxCol() - informa a largura da maior linha existente
     txOpen() - abre um arquivo texto, indexando-o
  txSetArea() - seleciona uma área de texto
     txSize() - informa o tamanho do texto ativo

A função txGetLine(), aliás, possui um recurso de filtro, para eliminar "impurezas" do texto e obter a linha pronta pra uso.

[SandroBelarmino]

Grande Maligno !!!
Ficamos no aguardo de mais essa contribuição.

Abraço.