1、我用CreateOleObject 呼叫 WORF 模板-成功!
2、我用VBA宏錄制:插入表格
FDoc.WordApplication.Selection.insertrows(1);提示 WordApplication錯誤!
3、用ADD的方法增加表格行數也是失敗
WordApplication.Selection.Tables.Item(1).Add(WordApplication.Selection.Range,2,1,EmptyParam,EmptyParam);
謝謝大俠門!!!!
uj5u.com熱心網友回復:
var
WordApp:OleVariant;
begin
wordApp:=CreateOleObject('word.application');
wordapp.visible:=true;
wordapp.documents.open('C:\Users\lenovo\Desktop\北京.doc');
//插入2行 2串列格
WordApp.activeDocument.tables.add(WordApp.selection.range,2,2,wdWord9TableBehavior);//wdWord9TableBehavior=1 自動調整表格
//在第一行前加入一行
WordApp.activeDocument.tables.item(1).rows.add(WordApp.activeDocument.tables.item(1).rows.item(1));
end;
親測可行
樓主方法都是找對了,但是引數代錯了啊
uj5u.com熱心網友回復:
我曾經弄過這事,可以自動生成word并且往里面填文字和表格當時好像是先到word里面查看原始碼,原始碼是VB的,
然后自己把原始碼轉換成Delphi的
uj5u.com熱心網友回復:
建議使用富文體格式修改,再轉回Word。轉載請註明出處,本文鏈接:https://www.uj5u.com/houduan/134455.html
標籤:語言基礎/算法/系統設計
上一篇:后綴名為DB為SYBASE資料庫檔案,能用DELPHI打開嗎?
下一篇:求教nextdbgrid
