DisplayAccessRights: Boolean;
DisplayAccessRights: boolean;
Свойство DisplayAccessRights определяет, отображать ли пиктограммы (), обозначающие наличие прав на доступ к данным.
Возможные значения:
True. По умолчанию. Пиктограммы прав доступа будут отображены;
False. Пиктограммы прав доступа не будут отображены.
Для получения подробной информации об отображении прав доступа к данным в виде пиктограмм обратитесь к разделу «Отображение прав доступа к данным в виде пиктограмм».
Для выполнения примера предполагается наличие формы, расположенного на ней компонента Button с наименованием «Button1», компонента TabSheetBox с наименованием «TabSheetBox1» и компонента UiReport с наименованием «UiReport1», являющегося источником данных для TabSheetBox (для примера на Fore.NET используйте компонент TabSheetBoxNet с наименованием «TabSheetBoxNet1» и компонент UiReportNet с наименованием «UiReportNet1»). В «UiReport1» должен быть загружен регламентный отчет.
Добавьте ссылки на системные сборки:
для примера на Fore: Tab, Report, Forms;
для примера на Fore.NET: Tab, Report, Forms, Forms.Net.
Пример будет выполняться при нажатии на кнопку, реализованную компонентом 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;
В результате выполнения примера на форме отобразится таблица с данными. В ячейках будут показаны пиктограммы прав доступа (), если у пользователя нет прав на редактирование данных в этих ячейках.
См. также: