ITabView.DisplayAccessRights

Синтаксис

DisplayAccessRights: Boolean;

Описание

Свойство DisplayAccessRights определяет, отображать ли пиктограммы (), обозначающие наличие прав на доступ к данным.

Комментарии

Возможные значения:

• True - отображать пиктограммы прав доступа;

• False - не отображать пиктограммы.

Пример Fore

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

Добавьте ссылки на системные сборки Pivot, Tab, Express.

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

Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
    EaxAn: IEaxAnalyzer;
    Pivot: IPivot;
    Grid: IEaxGrid;
    TabView: ITabView;
Begin
    EaxAn := UiErAnalyzer1.ErAnalyzer;
    Pivot := EaxAn.Pivot;
    Pivot.CalculateDataRights := True;
    Grid := EaxAn.Grid;
    TabView := Grid.TabSheet.View;
    TabView.DisplayAccessRights := True;
End Sub Button1OnClick;

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

Пример Fore.NET

Необходимые требования и результат выполнения примера Fore.NET совпадают с примером Fore.

Imports Prognoz.Platform.Interop.Pivot;
Imports Prognoz.Platform.Interop.Express;
Imports Prognoz.Platform.Interop.Tab;
Private Sub button1_Click(sender: System.Object; e: System.EventArgs);
Var
    EaxAn: EaxAnalyzer;
    Pivot: IPivot;
    Grid: IEaxGrid;
    TabView: ITabView;
Begin
    EaxAn := uiErAnalyzerNet1.ErAnalyzer.ErAnalyzer;
    Pivot := EaxAn.Pivot;
   Pivot.CalculateDataRights := True;
    Grid := EaxAn.Grid;
    TabView := Grid.TabSheet.View;
    TabView.DisplayAccessRights := True;
End Sub;

См. также:

ITabView; CalculateDataRight;