求救关于word2000中不规则表格的处理(100分)

请教各位高手：
在Delphi中如何控制Word2000中不规则表格，主要是读取表格数据到数据库，和将数据库中的数据填写到不规则的表格中。

合理利用Execept（异常）来处理。

循环的时候用异常来结束每一行的处理，这样就可统计出每行的cell数目

用表格的range的cells来处理就可以了，用的是delphi的server下的控件
_cellsCount:=worddoc1.Tables.Item(_TableOrder).range.cells.count;
for _i:=1 to _cellsCount do
begin
_ItemIndex:=_i;
_Range:=worddoc1.Tables.item(_TableOrder).range.Cells.item(_ItemIndex).range;
_Range.moveend(wdCharacter,-1); //去掉尾部段落标记
_txt:=_Range.text; //读取表格内容
Range.text:=_txt;//写入表格
end; //end for