ColumnSpan: Integer;
The ColumnSpan property merges N cells located in the same row where N is the value of this property.
Sub UserProc;
Var
MB: IMetabase;
MObj: IMetabaseObject;
Report: IPrxReport;
TabIs: IPrxTableIslands;
TI: IPrxTableIsland;
Layout: IPrxTableIslandLayout;
Row: IPrxTableIslandLayoutRow;
Cell: IPrxTableIslandLayoutCell;
Begin
MB := MetabaseClass.Active;
MObj := MB.ItemById("REPORT").Edit;
Report := MObj As IPrxReport;
TabIs := Report.TableIslands;
TI := TabIs.Item(0);
TI := TI.Edit;
Layout := TI.Layout;
Row := Layout.Rows(0);
Cell := Row.Cells(1);
Cell.ColumnSpan := 3;
TI.Save;
MObj.Save;
End Sub UserProc;
After executing the example the selected number of the layout cells located in the same row are merged. Report - identifier of the regular report, which sheet contains a relational data area.
See also: