IMetabasePolicy.PrivilegeCount

Синтаксис

PrivilegeCount: Integer;

Описание

Свойство PrivilegeCount возвращает количество привилегий, доступных в менеджере безопасности.

Пример

Sub Main;

Var

MB: IMetabase;

MS: IMetabaseSecurity;

MU: IMetabasePolicy;

i: Integer;

Begin

MB := MetabaseClass.Active;

MS := MB.Security;

MU := MS.Policy;

For i := 0 To MU.PrivilegeCount - 1 Do

Debug.WriteLine(MU.PrivilegeName(i));

End For;

End Sub Main;

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

См. также:

IMetabasePolicy