Type: AceType;
Свойство Type определяет тип доступа к объекту.
Для выполнения примера предполагается наличие в репозитории объекта с идентификатором "Obj_1".
Sub Main;
Var
MB: IMetabase;
ObjDesc: IMetabaseObjectDescriptor;
SecDesc: ISecurityDescriptor;
AcessCL: IAccessControlList;
ACE: IAccessControlEntry;
Type: AceType;
Begin
MB:=MetabaseClass.Active;
ObjDesc:=MB.ItemById("Obj_1");
SecDesc:=ObjDesc.SecurityDescriptor;
AcessCL:=SecDesc.Acl;
ACE:=AcessCL.Item(0);
Type:=ACE.Type;
End Sub Main;
После выполнения примера в переменной "Type" будет содержаться тип доступа первого дополнительного параметра безопасности объекта.
См. также: