在Delphi中如何把資料庫中的記錄引到Word中
編號： QA004684
建立日期: 2003年5月18日最後修改日期： 2003年5月20日
所屬類別：
Delphi - 資料庫
pq :
我用的系統是win2000，delphi是6.0版本，word2000
請教：在delphi中要把資料庫中的記錄引到word中，建成表格的形式，要在word中一頁上並排顯示兩個表格，如何實現呢？
回答:
我對這題的回覆是這樣的：我處理過類似的問題，但我是把資料倒到TXT裡面。也是畫成表格形式，不過我想是一樣的。
重要的是你把一個變數設為TStrings 的型別
如：
var
TXTstr:TStrings;
begin
TXTstr := TStringList.Create;
TXTstr.Append('────────┬────┬─────┬─────┬─────'); //第0行
TXTstr.Append('姓名│'); //第一行
.... //從資料庫取值到TXTADO
while not TXTADO.Eof do
Begin
TXTstr[1]:=TXTstr[1]+format('%8s',[TXTADO.FieldByName('XM').Asstring])+'│';
TXTADO.next;
end;
主持人註：完成這個問題，需要兩個步驟，一個是讀出資料庫中的數據，另一個是利用Automation技術控制Word完成排版並保存為Word檔案或列印。第一個步驟上面已經介紹了，第二個步驟請參考：QA003053 "用Delphi4.0直接控制Word97"。
loga的意見：
如果是VB，則可以在WORD中開啟錄製宏，再手動新增資料庫記錄，VBA可自動寫出程式碼。一孔之見僅供參考。
相關問題：
QA000836 "如何知道Excel97的命令集"
QA001381 "如何在VB中控制Word和Excel"
QA003819 "如何利用OLE 為Word 新增文字"
此問題由黃威回答。