Ler Arquivo Txt Com Delphi 7

[Guest Bosco]

;) Bom dia programadores de Plantão.

Nunca trabalhei com arquivos de txt no Delphi com eu faço para ler.

[s3c]

var f:TextFile; Linha:String;
begin
  AssignFile(f, 'Caminho do Arquivo.txt');
  Reset(f);
  While not Eof(f) do
    Readln(f, Linha);
  CloseFile(f);
end;

[escobar]

Boa dica... mas se for pra jogar para o MEMO...

memo1.lines.LoadFromFile( 'c:\dirname\filename.txt');

[Guest BOSCO]

QUERO IMPORTA DE TXT PARA BASE DE DADOS....?

[s3c]

Olá colega, utilizo importação/exportação de arquivos p/ banco de dados e vice-versa. Até o momento nunca soube de nenhum método ou rotina que faça isso automaticamente. No meu caso, eu tenho que conhecer o layout do registro p/ saber exatamente o que será lido ou gravado.

[bking]

eu tenho uma arquivo txt com os seguintes dados matricular, e valor.

Queria que a função abri-se o arquivo txt e fize-se o laçamento na base de dados linha por linha.

espero que tenha mim entendido.

[s3c]

A rotina de abertura e leitura do arquivo está descrita acima; só que você terá os dois campos numa única string(Linha), com isso você terá que dividir essa string nos dois campos p/ depois fazer o Insert na tabela.