100分求关于worddocument控件的使用?(100分)

  • 主题发起人 主题发起人 阿修罗
  • 开始时间 开始时间

阿修罗

Unregistered / Unconfirmed
GUEST, unregistred user!
大家好,我现在程序的最后阶段有一个大问题。也是关于delphi的word控件中的worddocument和wordapplication两个控件的使用。我使用这两个控件以便在word模板中输入一些数据,我的代码段是:
procedure form1.Button1Click(Sender: TObject);
var
Template,NewTemplate,ItemIndex:OleVariant;
Begin
Template := EmptyParam;
NewTemplate := True;
ItemIndex := 1;
Wordapplication.Connect;
WordApplication.Documents.Add(Template, NewTemplate);
{Assign WordDocument component}
WordDocument.ConnectTo(WordApplication.Documents.Item(ItemIndex));
//输出标题
WordDocument.Range.InsertAfter('这是一个word模板 '+ #13);
worddocument.Range.InsertAfter(' '+#13);
end;
当第一次点击按钮后,word正常打开并且显示。然后,我关闭word。回到界面,再点击按钮,这时,程序报错 “激活对象已经与其客户端断开”.是当程序运行到
WordDocument.ConnectTo(WordApplication.Documents.Item;时报的错.
基本情况就是这样,请各位大虾帮忙,怎样才能在外部关闭word后,让程序再重新打开word?
 
现在程序报错为"RPC面板无法使用"
那位大侠能解决,我再加100分.
 
在加200分,有人能解决吗?
 
哈,发财啦。
对worddocument的Onclose事件处理如下:
procedure TForm1.WordDocument1Close(Sender: TObject);
begin
Wordapplication1.Disconnect ;
WordDocument1.Disconnect ;
end;
你漏了一句 Wordapplication1.Visible := true ;没这句你看不到word。
我在Win2000+D5下试过,没问题。
说话可要算数啊,哈哈。
 
接受答案了.
 
后退
顶部