RowSpan: Integer;
Свойство RowSpan объединяет N ячеек, расположенных в одном столбце, где N - значение данного свойства.
Sub Main;
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.RowSpan := 2;
TI.Save;
MObj.Save;
End Sub Main;
После выполнения примера будет объединено заданное количество ячеек отображения, расположенных в одном столбце. «Report» - идентификатор регламентного отчета, на листе которого расположена реляционная область данных, структура отображения которой состоит из 2 строк.
См. также: