IMetabasePolicy.DiscretionaryAccessControl

Синтаксис

DiscretionaryAccessControl: Boolean;

Описание

Свойство DiscretionaryAccessControl определяет признак использования дискреционного контроля доступа к объектам.

Комментарии

По умолчанию свойству установлено значение True, при этом используется дискреционный контроль доступа к объектам.

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

Для настройки прав доступа используйте свойство SecurityDescriptor.

Пример

Sub Main;

Var

MB: IMetabase;

MS: IMetabaseSecurity;

MU: IMetabasePolicy;

s: String;

Begin

MB:=MetabaseClass.Active;

MS:=MB.Security;

MU:=MS.Policy;

If MU.DiscretionaryAccessControl Then

s:="Yes";

Else

s:="No";

End If;

End Sub Main;

После выполнения примера в переменной «s» будет содержаться «Yes» если установлен дискреционный контроль доступа.

См. также:

IMetabasePolicy | IMetabasePolicy.MandatoryAccessControl