代码合并表格文档中的单元格

atiger

参考代码如下：

Business.Model.TSheetDoc(DocViewWD.Doc).Sheet.Cells[1,2].Bounds :=
  classes.Rect(1,2,4,3);

其中，Rect(参数1，参数2，参数3，参数4)中， 前面两个参数表示需要合并的左上角的坐标，后面两个参数表示需要合并的右下角的坐标

更改单元格的值后，需要刷新文档。文档的刷新需要关闭再打开，不支持使用Refresh，代码参考如下：
DocViewSL.Doc.Close;
DocViewSL.OpenView(TDocMode.dmEdit, DocViewSL);

atiger

注意坐标
设计表格见附件

atiger

1楼代码运行后的效果