如何可以不退出界面,连续调用word?

Question

我在form里调用word,用的是delphi控件,procedure TForm1.Button4Click(Sender: TObject);
begin
    wordapplication1.Connect;
    wordapplication1.Visible:=true;
end;
第一次按此按钮可行,当把第一次调用的word 关闭后,再按此按钮会出现什么:RPC服务器不可用的信息',好象是地址指针出错,如何才能在按第二次前使控件恢复初始状态?请指点

Answer 1

procedure TForm1.Button1Click(Sender: TObject);
begin
  wordapplication1.Disconnect ;
  wordapplication1.Connect;
  wordapplication1.Visible:=true;end;