得到了WORD的DOCUMENTS对象，但是打不开WORD文件，怎么回事？

[llidch2001]

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函数却不能打开文件，也不报错，
请各位大大指点！

[laiqinghe]

那你往里面写数据 看能不能写进去！

[pengxuan]

你一个打开函数，是利用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文档函数（结束）

[Heyongfeng]

同意

[llidch2001]

网虫先生：
为什么找不到TWordApplication的帮助文档呢？是不是还要安装什么包？

[laiqinghe]

VB里可能有帮助 但是 DELPHI里 好象没有