//试试
var
vWordDocument: OleVariant;
begin
vWordDocument := WordApplication1.ActiveDocument;
vWordDocument.SaveAs('c:\temp.doc');
end;
var
vWordDocument: OleVariant;
begin
vWordDocument := WordApplication1.ActiveDocument;
vWordDocument.SaveAs('c:\temp.doc');
end;
解决方案 »
- 想创建一个打印到A4纸张基本不变形的BitMap,尺寸问题怎么处理?
- 下载了5,6个RXlib控件包装的时候都提示说错误,找不到什么文件~
- 哪位能给个穷举的算法?比如我有(a,b,c,d)几个数.现在要组成3位的或2位的?
- 期货程序化交易软件
- canvas.copyrect有没有不让他自动缩放的方法?
- 在DELPHI中如何利用EXCEL制作报表?
- 关于SQL语言的Like和*用法的问题
- IE弹出输入用户名密码对话框的问题
- 在DBGrid中如何显示日期型字段中的时间?谢谢。
- Delphi如何与Linux下的数据库连接?
- webbrowser中怎样打开exe文件
- 怎样在D6中的REPORT中实现DBTEXT能实现中文的自动折行?
你先用opendialog打开一个word文件
然后获取打开的文件名与路径,知道怎么用吗?
然后你在打开的word文件中修改文字
在用savedialog保存文件
把刚刚你获取的文件路径赋给savedialog1.filename
在在if savedialog1.Execute then
WordDocument1.SaveAs(savedialog.filename);
一切ok,
你试试看怎么样?如果还不行,我把我的源程序给你.