Como passar para a 2ª linha de um arquivo txt

Delphi

01/04/2003

Oi pessoal,

estou passando um arquivo txt para uma tabela paradox, mas o arquivo tem mais de uma linha e cada linha corresponde a um campo da tabela, mais ou menos assim:

data
nome do arquivo
.
.
.

já consegui converter a primeira linha, mas não consigo passar para as outras.

Alguém sabe como posso fazer isso????

desde já agradeço,

Di


Anonymous

Anonymous

Curtidas 0

Respostas

Anonymous

Anonymous

01/04/2003

Use

Readln // Ele lê pulando linha


GOSTEI 0
Aroldo Zanela

Aroldo Zanela

01/04/2003

Oi pessoal, estou passando um arquivo txt para uma tabela paradox, mas o arquivo tem mais de uma linha e cada linha corresponde a um campo da tabela, mais ou menos assim: data nome do arquivo . . . já consegui converter a primeira linha, mas não consigo passar para as outras. Alguém sabe como posso fazer isso???? desde já agradeço, Di

Dirlene,

Coloca uma parte do código aqui.


GOSTEI 0
Anonymous

Anonymous

01/04/2003

try
AssignFile(log,´c:\Teste.txt´);
if not FileExists(´c:\Teste.txt´) then
Rewrite(log,´c:\Teste.txt´);
Append(log); /////////////////////////// É Aqui aonde ele insere uma
Write(log,´Teste´); Linha!!!!! Sem Apagar
finally
CloseFile(log);
end;

plinioleite@zipmail.com.br :shock:


GOSTEI 0
POSTAR