Flags: SecurityDescriptorFlags;
Свойство Flags определяет признак наследования прав доступа от родительского объекта.
Для выполнения примера убедитесь, что в репозитории содержится объект с идентификатором «Obj_1».
Добавьте ссылку на системную сборку Metabase.
Sub UserProc;
Var
MB: IMetabase;
SDesc: ISecurityDescriptor;
Begin
MB := MetabaseClass.Active;
SDesc := MB.ItemById("Obj_1").SecurityDescriptor;
SDesc.Edit;
SDesc.Flags := SecurityDescriptorFlags.Locked;
SDesc.Apply(False);
End Sub UserProc;
После выполнения примера для указанного объекта будет отменено наследование прав доступа от родительского объекта.
См. также: