IMetabasePolicy.MandatoryAccessControl

Синтаксис

MandatoryAccessControl: Boolean;

Описание

Свойство MandatoryAccessControl определяет признак использования мандатного метода разграничения доступа.

Комментарии

По умолчанию свойство имеет значение False – мандатный доступ не используется. При установке значения 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.MandatoryAccessControl Then

s:="Yes"

Else

s:="No"

End If;

End Sub Main;

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

См. также:

IMetabasePolicy | IMetabasePolicy.MandatoryAccess | IMetabasePolicy.DiscretionaryAccessControl