Como importar registros do banco de dados para o Word no Delphi
Nº: QA004684
Data de criação: 18 de maio de 2003 Data da última modificação: 20 de maio de 2003
Categoria:
Delphi - banco de dados
pq :
O sistema que utilizo é o win2000, o delphi é a versão 6.0 e o word2000
Pergunta: No Delphi, precisamos importar os registros do banco de dados para o Word e criá-los na forma de tabelas. Precisamos exibir duas tabelas lado a lado em uma página no Word.
responder :
Minha resposta a esta pergunta é esta: já lidei com problemas semelhantes, mas coloquei os dados no TXT. Também é desenhado em forma de tabela, mas acho que é a mesma coisa.
O importante é que você defina uma variável como sendo do tipo TStrings
como:
var
TXTstr:TStrings;
começar
TXTstr := TStringList.Create;
TXTstr.Append('────────┬────┬─────┬─────┬─────');
TXTstr.Append('Nome│'); //Primeira linha
.... //Obtém o valor do banco de dados para o TXTADO
enquanto não TXTADO.Eof faça
Começar
TXTstr[1]:=TXTstr[1]+format('%8s',[TXTADO.FieldByName('XM').Asstring])+'│';
TXTADO.próximo;
fim;
Nota do moderador: Duas etapas são necessárias para responder a esta questão. Uma é ler os dados no banco de dados e a outra é usar a tecnologia de automação para controlar o Word para concluir a composição e salvá-los como um arquivo do Word ou imprimi-los. A primeira etapa foi apresentada acima. Para a segunda etapa, consulte: QA003053 "Usar Delphi4.0 para controlar diretamente o Word97".
opinião de loga :
Se for VB, você pode abrir a macro gravada no WORD, adicionar manualmente os registros do banco de dados e o VBA pode escrever o código automaticamente. Um vislumbre é apenas para referência.
Perguntas relacionadas:
QA000836 "Como conhecer o conjunto de comandos do Excel97"
QA001381 "Como controlar Word e Excel em VB"
QA003819 "Como adicionar texto ao Word usando OLE"
Esta pergunta foi respondida por Huang Wei .