ITabView.DisplayAccessRights

Синтаксис

DisplayAccessRights: Boolean;

DisplayAccessRights: boolean;

Описание

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

Комментарии

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

Для получения подробной информации об отображении прав доступа к данным в виде пиктограмм обратитесь к разделу «Отображение прав доступа к данным в виде пиктограмм».

Пример

 

Для выполнения примера предполагается наличие формы, расположенного на ней компонента Button с наименованием «Button1», компонента TabSheetBox с наименованием «TabSheetBox1» и компонента UiReport с наименованием «UiReport1», являющегося источником данных для TabSheetBox (для примера на Fore.NET используйте компонент TabSheetBoxNet с наименованием «TabSheetBoxNet1» и компонент UiReportNet с наименованием «UiReportNet1»). В «UiReport1» должен быть загружен регламентный отчет.

Добавьте ссылки на системные сборки:

Пример будет выполняться при нажатии на кнопку, реализованную компонентом Button с наименованием «Button1».

Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
    Report: IPrxReport;
    TabView: ITabView;
Begin 
    
//Активируем компонент для получения доступа к данным
    UiReport1.Active:=True;
    
//Определим регламентный отчет, подключенный к компоненту
    Report := UiReport1.Report;
    
//Получим представление электронной таблицы
    TabView := (Report.ActiveSheet As IPrxTable).TabSheet.View;
    
//Включим отображение пиктограмм прав доступа
    TabView.DisplayAccessRights := True;
End Sub Button1OnClick;

Imports System.Windows.Forms;
Imports Prognoz.Platform.Forms.Net;
Imports Prognoz.Platform.Interop.Report;
Imports Prognoz.Platform.Interop.Tab;

Private Sub button1_Click(sender: System.Object; e: System.EventArgs);
Var
    Report: IPrxReport;
    TabView: ITabView;
Begin 
    
//Активируем компонент для получения доступа к данным
    UiReportNet1.Active:=True;
    
//Определим регламентный отчет, подключенный к компоненту
    Report := UiReportNet1.ReportUi.Report;
    
//Получим представление электронной таблицы
    TabView := (Report.ActiveSheet As IPrxTable).TabSheet.View;
    
//Включим отображение пиктограмм прав доступа
    TabView.DisplayAccessRights := True;
End Sub;

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

См. также:

ITabView | IPrxReport