delphi中如何打开新的word文档

1.按下面的方法打开word,但是没有新文档,得自己新建,能不能自动生成一个新文档.
2.打开word的时候,程序界面也跳出来了,能不能让它在word后,或者最小化
Delphi(Pascal) code:
uses comobj;
procedure TForm1.word1Click(Sender: TObject);
var Word: Variant;
begin
try
Word := CreateOLEObject('Word.Application');
Word.Visible := true;
except
Showmessage('初始化word失败，可能没装word，或者其他错误；请重起再试。');
word.DisplayAlerts := false;//是否提示存盘
word.Quit;//如果出错则退出
exit;
end;
Application.Restore;
Application.BringToFront;
end;

---

谢谢楼上的,孩子好漂亮
这样一来,第二个问题就没有了,但是excel在调用的时候,excel工作表出来了,接着程序界面也出来了呢,不知道大家有没有遇到这种情况.

---

Word.Documents.Add;
什么意思 解释一下

楼组excel 这样行不
Excel.Documents.Add;

---

excel的话：
Excel.Workbooks.Add

---

mark