wordapp := CreateOleObject( 'word.Application' );
wordApp.Documents.Open( 'd:\1.doc'revert:=false);
用revert参数怎么不能达到office vba帮助中的效果?
 
Revert  Variant 类型,可选。当 FileName 是一个已打开的文档的文件名时,控制相应的操作。如果为 True,则放弃对已打开文档进行的所有尚未保存的改动,并将重新打开该文档。如果为 False,则激活已打开的文档。

解决方案 »

  1.   

    wordApp.Documents.Open( 'd:\1.doc'revert:=false);
    上面的写法不太对吧,Delphi是强类型的,上面的肯定不符合函数声明。
      

  2.   

    该语句能打开文档,只是revert参数不起作用;写法应该是对的。用别的参数也试过。
    wordApp.Documents.Open( 'd:\1.doc',readonly:=true);
    以只读方式打开文档。