Gravar banco arquivo texto
Boa tarde,
tenho uma query com o campo A,B
Como faço para gravar estes campos em arquivo texto separados por um (;) ponto e virgula
exemplo
A B
Maria ; 20
Joao ; 10
tenho uma query com o campo A,B
Como faço para gravar estes campos em arquivo texto separados por um (;) ponto e virgula
exemplo
A B
Maria ; 20
Joao ; 10
Omegatrue
Curtidas 0
Respostas
Rodrigo Costa
12/12/2003
var arquivo:textfile;
...
rewrite(arquivo,´C:\arquivo.txt´); //Cria o arquivo;
query.first;
while not query.eof do
begin
append(arquivo);
writeln(arquivo,query.fieldbyname(´A´).asstring+´;´+query.fieldbyname(´A´).asstring);
query.next;
end;
...
rewrite(arquivo,´C:\arquivo.txt´); //Cria o arquivo;
query.first;
while not query.eof do
begin
append(arquivo);
writeln(arquivo,query.fieldbyname(´A´).asstring+´;´+query.fieldbyname(´A´).asstring);
query.next;
end;
GOSTEI 0
Omegatrue
12/12/2003
Obrigado Rodrigo
GOSTEI 0
Rodrigo Costa
12/12/2003
Disponha !
obs: esqueci de dizer que vc deve fechar o arquivo após acabar de escrever nele para evitar erro:
obs: esqueci de dizer que vc deve fechar o arquivo após acabar de escrever nele para evitar erro:
{Fecha o arquivo} closefile(arquivo);
GOSTEI 0