delphi中快速连接word并在word中输入文本 ( 积分: 100 )

大家好！ 想请教大家一个问题，就是怎样在delphi中打开word文档，并在word文档中输入文档，文档包括数据库中的数据，这些具体怎样实现？我试过通过以下代码：
procedure TForm1.Button2Click(Sender: TObject);
begin
wordapplication1.Connect;
wordapplication1.Visible:=true;
end;
procedure TForm1.Button4Click(Sender: TObject);
var
t1,newt1,t1index,type1,v1levariant;
begin
t1:=emptyparam;
newt1:=emptyparam;
type1:=combobox1.ItemIndex;
v1:=true;
t1index:=1;
fstart:=0;
fend:=0;
wordapplication1.Documents.Add(t1,newt1,type1,v1);
worddocument1.Connectto(wordapplication1.Documents.Item(t1index));
end;
运行了，点击任何一个button就没有反映？是不是连接word有问题吗？

如果哪位朋友知道的话，提示点儿，多谢了。

其他按钮都是什么事件？？如果有按钮是关闭word的话，应该是可以使用的，并且会提示你怎么保存或保存路径

就是上面写的代码里的button ，比如按button2就没反映了 ，其它的按钮也按不起。

delphi里面有连接Word等Office程序的控件啊？你没有看到吗？

我操，这个世界没有天理了～～～～～ MD,老虎不发威,当我是病猫, 先骂人的倒有理了 我可是从来不主动得罪人的 谁要是欺负人,那就不客气了 明天把这个工具开个源,叫大家都来用用 请问你们有什么拿的出手的?自己写的东西? 说出来叫大爷我长长见识？ 别不会是一群耍嘴皮子的废物吧？

已解决 谢谢

多人接受答案了。