IPrxDataIslandCorner.Merge

Синтаксис

Merge: Boolean;

Описание

Свойство Merge определяет объединять или нет уголок таблицы. True если объединять.

Пример

Sub Main;

Var

MB: IMetabase;

Report: IPrxReport;

DIs: IPrxDataIslands;

DI: IPrxDataIsland;

Prop: IPrxDataIslandProperties;

Corner: IPrxDataIslandCorner;

Style: IPrxCellStyle;

s: String;

Begin

MB := MetabaseClass.Active;

Report := MB.ItemById("Report").Bind As IPrxReport;

DIs := Report.DataIslands;

DI := DIs.Item(0);

Prop := DI.Properties;

Corner := Prop.Corner;

If Corner.Merge Then

s := "Merge";

Else

s := "Don.t Merge";

End If;

End Sub Main;

После выполнения примера в переменной «s» будет содержаться «Merge», если для угловой ячейки таблицы первой области данных установлено объединение. Идентификатор регламентного отчета - «Report».

См. также:

IPrxDataIslandCorner