Exportar registros de BD no bloco de notas
TENHO UM BD ACCESS E MANIPULO O MESMO NO DELPHI VIA ADO,
GOSTARIA DE SABER COMO EXPORTAR DETERMINDOS CAMPOS(NAO TODOS), DESTE BD, PARA O BLOCO DE NOTAS DE MANEIRA QUE OS REGISTROS FIQUEM UM ATRAS DO OUTRO SEM FICA ESPAÇO ENTRE AMBOS.
EX.: CAMPO 1: ADRIANO
CAMPO2: 25233
NO BLOCO DE NOTAS = ADRIANO25233
MUITO GRATO,
ADRIANO
[b:0049b640dd]Título editado. Favor não postar, tanto o título quanto a mensagem em caixa alta, pois equivale a gritar.[/b:0049b640dd]
Sandra/Moderação
GOSTARIA DE SABER COMO EXPORTAR DETERMINDOS CAMPOS(NAO TODOS), DESTE BD, PARA O BLOCO DE NOTAS DE MANEIRA QUE OS REGISTROS FIQUEM UM ATRAS DO OUTRO SEM FICA ESPAÇO ENTRE AMBOS.
EX.: CAMPO 1: ADRIANO
CAMPO2: 25233
NO BLOCO DE NOTAS = ADRIANO25233
MUITO GRATO,
ADRIANO
[b:0049b640dd]Título editado. Favor não postar, tanto o título quanto a mensagem em caixa alta, pois equivale a gritar.[/b:0049b640dd]
Sandra/Moderação
Xadriano
Curtidas 0
Respostas
Okama
06/05/2004
Var
Arquivo: TextFile;
Begin
AssignFile( Arquivo, ´C:\Teste.txt´);
ReWrite(Arquivo);
S := Trim( ADOQuery1.FieldByName(´Campo1´).AsString)+
Trim( ADOQuery1.FieldByName(´Campo2´).AsString);
WriteLn( Arquivo, S);
CloseFile( Arquivo );
end;GOSTEI 0