IDimElements.ReadAccess

Синтаксис

ReadAccess(Element: Integer): Boolean;

Параметры

Element — индекс элемента.

Описание

Свойство ReadAccess возвращает True, если к элементу Element есть доступ на чтение.

Пример

Для выполнения примера предполагается наличие объекта репозитория с идентификатором «D_TO».

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

Sub UserProc;
Var
    MB: IMetabase;
    Dimen: IDimInstance;
    Elem: IDimElements;
    s: String;
Begin
    MB:=MetabaseClass.Active;
    Dimen:=MB.ItemById("D_TO").Open(Null) As IDimInstance;
    Elem:=Dimen.Elements;
    If Elem.ReadAccess(20) Then
        s:="Read";
        Else s:="Don’t Read";
    End If;
End Sub UserProc;

После выполнения примера в переменной «s» будет содержаться «Read», если разрешен доступ на чтение двадцатого элемента справочника для текущего пользователя.

См. также:

IDimElements | ISecurityLabels