如何使用 Delphi 给 word 增加表格？(50分)

现有一个模板文件 aaa.dot.
里面有一个表格，形式如
+------+-------------------------------------------
|姓名：|网重
|---------------------------------------------------
|简历：
+-------------------------------------------------
|-------------------------------------------
现在需要简历下面的单元格中动态插入一个表格（两列，行数由数据库中的数据决定）
现在代码写了如下：

..try
WordApp := CreateOleObject('Word.Application');
MyDoc := CreateOleObject('Word.Document');
except
Raise Exception.Create('无法打开Word，请确认已安装Word。');
end;

WordApp.Visible := true;
MyDoc := WordApp.Documents.Add(FileName,false);

MyDoc.BookMarks.Item('简历表').Select;
WordApp.Selection.Text := Edit1.Text+'的个人简历';
wTable := MyDoc.Tables.Item(1);

接下来该如何完成？
..

wtable.cell(3,1).Range.Text :='个人简历';
wtablenew:=wtable.cell(3,1).tables.Add(wtable.cell(3,1).range,10,10,wdWord9TableBehavior,wdAutoFitFixed);
^^^^^^
就是多少行，多少列的意思啦
wdXXX在word2000单元中有定义，我是直接从word录制的宏中copy过来的。

>>

To honghs:
谢谢你的提示，现在的问题是：
我录制了宏: Selection.InsertRowsBelow 1
我如何转化为 Delphi 的语句？
wTable.InsertRowsBelow(1);
和 wTable.Cell(3,1).InsertRowsBelow(1);
都错误！

wtable.cell(3, 1).select;
wordapp.selection.insertrowsbelow(1);
老兄要学会用vba的对象浏览器才行啊，在vba中视图-对象浏览器
在那可以看到这些对象的方法和属性

接受答案了.