ITabCellStyle.AccessRights

Синтаксис

AccessRights: TabAccessRights;

Описание

Свойство AccessRights определяет права доступа на данные для данного стиля.

Комментарии

По умолчанию используется полный доступ к данным. Если свойство принимает значение TabAccessRights.NoAccess или TabAccessRights.Write, то учитывайте следующие ограничения:

Пример

Для выполнения примера предполагается наличие регламентного отчёта с идентификатором REGULAR_REPORT.

Добавьте ссылки на системные сборки: Metabase, Report, Tab.

Sub UserProc;
Var
    MB: IMetabase;
    Report: IPrxReport;
    TabSheet: ITabSheet;
    TabView: ITabView;
    Style: ITabCellStyle;
Begin
    MB := MetabaseClass.Active;
    // Получим регламентный отчёт
    Report := MB.ItemById("REGULAR_REPORT").Edit As IPrxReport;
    // Получим таблицу
    TabSheet := (Report.ActiveSheet As IPrxTable).TabSheet;
    TabView := TabSheet.View;
    // Включим отображение пиктограмм прав доступа
    TabView.DisplayAccessRights := True;
    // Получим стиль отображения первой строки
    Style := TabSheet.Row(0).Style;
    // Установим права доступа только для чтения данных
    Style.AccessRights := TabAccessRights.Read;
    // Сохраним изменения
    (Report As IMetabaseObject).Save;
End Sub UserProc;

В результате выполнения примера первая строка таблицы будет доступна только для чтения.

См. также:

ITabCellStyle