var MSWord: OLEVariant;
begin
try
MSWord:= CreateOleObject('Word.Application');
MsWord.Documents.Add(); //創建空文檔;
except
MsWord.quit;
Exit;
end; MsWord.ActiveDocument.Tables.Add(Range:=MsWord.Selection.Range,
NumRows:=3,
NumColumns:=3,
DefaultTableBehavior:=0,
AutoFitBehavior:=0);
end;
以上是在Word檔中畫一個3行3列的表,而我的問題是:如何在指定的一個單元格增加一行或一列?刪除一行或一列?還有使產生的Word檔的版面為橫向的,默認的為縱向.請各位兄弟幫忙!!
begin
try
MSWord:= CreateOleObject('Word.Application');
MsWord.Documents.Add(); //創建空文檔;
except
MsWord.quit;
Exit;
end; MsWord.ActiveDocument.Tables.Add(Range:=MsWord.Selection.Range,
NumRows:=3,
NumColumns:=3,
DefaultTableBehavior:=0,
AutoFitBehavior:=0);
end;
以上是在Word檔中畫一個3行3列的表,而我的問題是:如何在指定的一個單元格增加一行或一列?刪除一行或一列?還有使產生的Word檔的版面為橫向的,默認的為縱向.請各位兄弟幫忙!!
解决方案 »
- W1057 Implicit string cast from 'AnsiChar' to 'stri
- Indy(9.0.18)控件IdPop3.Retrieve,IdMessage.SaveToFile后,有少部分邮件出现乱码
- 关于时间计算和dbgrid修改问题,谢谢
- 请教一简单问题 用ado连接带密码SQL Server 2000
- 谁肯帮菜鸟的忙??
- 求助随机算法,thanks all.bow
- 关于dll实现窗体重用的问题?
- MessageDialog 这个组件的哪个属性是控制显示图片的不同
- 在线等候!请问再indy的post中可否设置cookie?假如可以的话怎么做?
- 看了我的程序,他们哭了!
- 在DELPHI中怎样调用ORACLE存储过程中的CURSOR输出参数,举例说明。
- 不知道哪里有EhLib2.0控件的使用详例?
我在网吧不能给你确切的消息!