delphi与word文档的打开(50分)

  • 主题发起人 主题发起人 zhy1356
  • 开始时间 开始时间
Z

zhy1356

Unregistered / Unconfirmed
GUEST, unregistred user!
如何在delphi中打开一个已经存在的word文档
 
用CreateOLEObject创建word的ole对象,就可以控制word了
procedure TForm1.Button1Click(Sender: TObject);
var
MSWord:olevariant;
begin
MSWord := CreateOLEObject('Word.Application');
MSWord.Documents.Open (FileName:='c:/newword.doc', ReadOnly:=False); //e:/newword.doc为已存在的word文件
MSWord.Visible := 1;
end;
 
接受答案了.
 
后退
顶部