得到了WORD的DOCUMENTS对象，但是打不开WORD文件，怎么回事？
var
WordApp, WordDocuments, FileName: Variant;
begin
WinExec('D:\\SoftWare\\Microsoft Office\\Office\\WINWORD.exe',SW_SHOW);
WordApp:=CreateOleObject('Word.Application');
WordDocuments:=WordApp.Documents;
FileName:=Variant('E:\\special.doc');
WordDocuments.Open(FileName);
end;
我调试了一下，Documents对象已经获得了，但是最后的OPEN函数却不能打开文件，也不报错，
请各位大大指点！
问题点数：0、回复次数：5Top
1 楼laiqinghe（生活就如它……）回复于 2005-04-01 14:02:05 得分 0
那你往里面写数据 看能不能写进去！Top
2 楼pengxuan（网虫先生）回复于 2005-04-01 14:05:01 得分 0
你一个打开函数，是利用server控件打开Word文档。
procedure openwordfile(Myword: TWordApplication; Myfile: string;IsVisible:Boolean); //打开Word文档函数。
//Myword:文档工程名称；Myfile:word文件名；IsVisible来控制是否显示。
var
FileName, ConfirmConversions, ReadOnly, AddToRecentFiles,
PasswordDocument, PasswordTemplate, Revert,WritePasswordDocument,
WritePasswordTemplate, Format,MatchCase, MatchWholeWord, find1, rep1,
MatchWildcards, MatchSoundsLike, MatchAllWordForms, Forward,
Wrap, Replace: OleVariant;
{以上的变量都是TDocument.open函数所必需的，都是系统默认的，详情请参看Word的Help}
{可能会碰到错误的提示，一种情况是Uses一下Office97就可以了。}
begin
Myword.Connect;
Myword.Visible :=false;
FileName := MyFile; //打开的文件名称。
confirmConversions := False;
ReadOnly := False;
AddToRecentFiles := False;
PasswordDocument := '';
PasswordTemplate := '';
Revert := True;
WritePasswordDocument := '';
WritePasswordTemplate := '';
Format := wdOpenFormatDocument;
myWord.Documents.Open(FileName, ConfirmConversions,
readOnly, AddToRecentFiles, PasswordDocument, PasswordTemplate,
Revert, WritePasswordDocument, WritePasswordTemplate, Format);
Myword.Visible :=True;
Myword.Disconnect;
end;
//打开Word文档函数（结束）
Top
3 楼Heyongfeng（小何）回复于 2005-04-01 16:04:14 得分 0
同意Top
4 楼llidch2001（废石头）回复于 2005-04-01 17:29:29 得分 0
网虫先生：
为什么找不到TWordApplication的帮助文档呢？是不是还要安装什么包？Top
5 楼laiqinghe（生活就如它……）回复于 2005-04-02 14:32:20 得分 0
VB里可能有帮助 但是 DELPHI里 好象没有Top
