13,824
社区成员
发帖
与我相关
我的任务
分享Word 97自动化
int j;
V=GetWordObject(); //获得Word 97自动化对象Application
Vdocuments=V.OleFunction("Documents");//此语句运行时有问题???功能是通过Application获取Documents对象
if (OpenDialog1->Execute()) //使用Documents对象的Open方法打开文件,并返回Document对象
Vdocument1=Vdocuments.OleFunction("Open",OpenDialog1->FileName);
j=Vdocument1.OleFunction("ComputeStatistics",2);//计算打开文档的页数
Label1->Caption="文件"+Vdocument1.OlePropertyGet("Name")+"页数是:"+IntToStr(j);
V=GetWordObject(); //获得Word 97自动化对象Application
Vdocuments=V.OleFunction("Documents");//此语句运行时有问题???功能是通过Application获取Documents对象
if (OpenDialog1->Execute()) //使用Documents对象的Open方法打开文件,并返回Document对象
Vdocument1=Vdocuments.OleFunction("Open",OpenDialog1->FileName);
j=Vdocument1.OleFunction("ComputeStatistics",2);//计算打开文档的页数
Label1->Caption="文件"+Vdocument1.OlePropertyGet("Name")+"页数是:"+IntToStr(j);
...全文
请发表友善的回复…
发表回复
sunjiawei2001 2004-08-02
- 打赏
- 举报
如果我想在我memo中的数据添加到word中呢？怎么写语句啊？
3xcom 2004-07-31
- 打赏
- 举报
dd
ccrun.com 2004-07-31
- 打赏
- 举报
换成这个试试:
Vdocuments=V.OlePropertyGet("Documents");
Vdocuments=V.OlePropertyGet("Documents");
sunjiawei2001 2004-07-31
- 打赏
- 举报
如果我想在我memo中的数据添加到word中呢？怎么写语句啊？
commars 2004-07-30
- 打赏
- 举报
UP!
sunjiawei2001 2004-07-30
- 打赏
- 举报
Vdocuments=V.OleFunction("Documents");//此语句运行时有问题???功能是通过Application获取Documents对象
