IAccessToken.ClassificationLabel

Синтаксис

ClassificationLabel(Category: ISecurityCategory): ISecurityLevel;

Параметры

Category — категория мандатного доступа.

Описание

Свойство ClassificationLabel определяет классификационную метку для данной категории.

Комментарии

Категория безопасности передается посредством параметра Category.

Пример

Sub Main;

Var

MB: IMetabase;

User: IMetabaseUser;

Tok: IAccessToken;

SecCat: ISecurityCategory;

SecLevel: ISecurityLevel;

Begin

MB := MetabaseClass.Active;

User := MB.Security.Users.Item(0);

Tok := User.Token;

SecCat := MB.Security.Policy.MandatoryAccess.Category(0);

SecLevel := SecCat.Level(3);

Tok.ClassificationLabel(SecCat) := SecLevel;

MB.Security.Apply;

End Sub Main;

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

См. также:

IAccessToken