关于TWordApplication 和TWordDocument 的有关问题

关于TWordApplication 和TWordDocument 的问题

怎样在文档中插入表格、操作表格?

先谢谢各位



------解决方案--------------------
在Word里面录制一个宏就知道需要调用哪些函数了
------解决方案--------------------
try
{
WordApplication1-> Connect(); //建立一个新文档
WordApplication1-> Documents-> Add(); //将WordApplication1对象与WordDocument1对象进行连接
WordDocument1-> ConnectTo(WordApplication1-> Documents-> Item(Variant(1)));//在word中添加一个4×8表格
WordDocument1-> Tables-> Add(WordDocument1-> Range(EmptyParam,EmptyParam),4,8); //在word文档末尾添加一个4*8表格
WordDocument1-> Tables-> Item(Variant(1))-> Cell(Variant(3),Variant(5))-> Range-> set_Text(WideString( "单元格内容 ")); //第3行第5列的单元格需要插入一段文本
WordDocument1-> Tables-> Item(Variant(1))-> Cell(Variant(1),Variant(1))-> Merge(WordDocument1-> Tables-> Item(Variant(1))-> Cell(Variant(1),Variant(2))); //将表格中的(1,1)与(1,2)单元格合并
WordDocument1-> Tables-> Item(Variant(1))-> Cell(Variant(1),Variant(1))-> Merge(WordDocument1-> Tables-> Item(Variant(1))-> Cell(Variant(1),Variant(2))); //将表格中的(3,5)单元格拆分为2行3列的单元格
WordApplication1-> set_Visible(true);
}
catch(...)
{
MessageBox(Handle, "系统可能没有安装word! ", "信息提示 ",MB_OK);
WordApplication1-> Disconnect();
}