Clear;
Метод Clear очищает список дополнительных параметров безопасности объекта.
Для выполнения примера предполагается наличие в репозитории объекта с идентификатором "Obj_1".
Sub Main;
Var
MB: IMetabase;
ObjDesc: IMetabaseObjectDescriptor;
SecDesc: ISecurityDescriptor;
AcessCL: IAccessControlList;
Begin
MB:=MetabaseClass.Active;
ObjDesc:=MB.ItemById("Obj_1");
SecDesc:=ObjDesc.SecurityDescriptor;
SecDesc.Edit;
AcessCL:=SecDesc.Acl;
AcessCL.Clear;
SecDesc.Apply(True);
End Sub Main;
После выполнения примера произойдет очистка списка пользователей обладающих правами доступа к объекту с идентификатором «sh1».
См. также: