如何用wordapplication 控件方式 打开word 文档？？

[gjjguown]

procedure TForm1.Button7Click(Sender: TObject);

var TempDoc,NewTempDoc,TempWord,TempEmpty:OleVariant;

begin
TempEmpty:=EmptyParam;
TempDoc:=EmptyParam;
NewTempDoc:=True;
try
Wordapplication1.Connect;
except
MessageDlg('无法打开Word，请确认已安装Word。', mtError, [mbOk], 0);
Abort;
end;
//打开指定WORD文档
TempWord:='d:\samp.doc';
WordApplication1.Visible:=True;
WordApplication1.Documents.Open(TempWord,TempEmpty,TempEmpty,TempEmpty,TempEmpty,TempEmpty,TempEmpty,TempEmpty,TempEmpty,TempEmpty);
end;

但是始终出现这样的提示Not enough actual parameters
请帮忙！！！！！！

[dycll]

再加几个TempEmpty试试,呵呵,肯定可以的.

[gjjguown]

Not enough actual parameters
是什么意思？

[147737010]

mark