IPivotTable.DataRights

Синтаксис

DataRights(Row: Integer; Column: Integer): CubeDataRights;

Параметры

Row. Индекс строки ячейки;

Column. Индекс столбца ячейки.

Описание

Свойство доступно только для чтения.

Свойство DataRights возвращает права доступа на данные указанной ячейки.

Пример

Для выполнения примера предполагается наличие формы, расположенной на ней кнопки с наименованием «Button1», компонента TabSheetBox и компонента UiErAnalyzer с наименованием «UiErAnalyzer1», являющегося источником данных для TabSheetBox. В «UiErAnalyzer1» должен быть загружен экспресс-отчет.

Пример будет выполняться при нажатии на кнопку.

Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
    EaxAn: IEaxAnalyzer;
    Pivot: IPivot;
    Table: IPivotTable;
    Col, Row: Integer;
Begin
    EaxAn := UiErAnalyzer1.ErAnalyzer;
    Pivot := EaxAn.Pivot;
    Pivot.CalculateDataRights := True;
    Table := Pivot.ObtainTable;
    Table.Edit;
    For Col := 0 To Table.ColumnCount - 1 Do
        For Row := 0 To Table.RowCount - 1 Do
            If Table.DataRights(Row, Col) = CubeDataRights.ReadWrite Then
                Table.Cell(Row, Col) := Math.RandBetweenI(05);
            End If;
        End For;
    End For;
    Table.Post;
    Pivot.Refresh;
End Sub Button1OnClick;

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

См. также:

IPivotTable