IPrxDataIslandHeaderCommon.IsSeparated

Синтаксис

IsSeparated: Boolean;

Описание

Свойство IsSeparated определяет, установлено ли размещение элементов уровня в отдельной строке/столбце.

Комментарии

Допустимые значения:

Пример

Для выполнения примера предполагается наличие формы, содержащей компонент Button с идентификатором «Button1» и компонент UiReport с идентификатором «UiReport1». В качестве источника данных используется регламентный отчет с настроенной иерархией. Пример является обработчиком события OnClick для компонента «Button1».

Добавьте ссылку на системную сборку «Dimensions».

Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
    Rep: IPrxReport;
    DIs: IPrxDataIslands;
    DI: IPrxDataIsland;
    DimModel: IDimensionModel;
    DIProp: IPrxDataIslandProperties;
    Top: IPrxDataIslandDimension;
    Level: IPrxDataIslandLevel;
Begin
    Rep := UiReport1.Report.Edit;
    DIs := Rep.DataIslands;
    DI := DIs.Item(0).Edit;
        DimModel := DI.Slice.TopHeader.Item(0).Dimension.Dimension;
        DIProp := DI.Properties;
        Top := DIProp.Dimension(DimModel);
        Level := Top.Level(DimModel.Levels.Item(0));
        If Not Level.IsSeparated Then
            Level.Separated := TriState.OnOption;
        End If;
        Debug.Write("Опция Разместить элементы уровня отдельно: ");
        Select Case Level.Separated
            Case TriState.OnOption:
                Debug.WriteLine("включена");
            Case TriState.OffOption:
                Debug.WriteLine("отключена");
        End Select;
    DI.Save;
    Rep.Save;
End Sub Button1OnClick;

После выполнения примера в окно консоли будет выведен результат проверки, установлено ли размещение элементов уровня в отдельном столбце для столбцов заданной области данных регламентного отчета.

В случае, если опция была установлена, то она будет отключена для столбцов первой области данных.

См. также:

IPrxDataIslandHeaderCommon