Remove(Index: Integer): Boolean;
Index - индекс дополнительного параметра безопасности.
Метод Remove осуществляет удаление дополнительного параметра безопасности объекта и возвращает признак удачного удаления. Метод возвращает True, если удаление дополнительного параметра прошло удачно.
Для выполнения примера предполагается наличие в репозитории объекта с идентификатором "Obj_1".
Sub Main;
Var
MB: IMetabase;
ObjDesc: IMetabaseObjectDescriptor;
SecDesc: ISecurityDescriptor;
AcessCL: IAccessControlList;
ACE: IAccessControlEntry;
s: String;
Begin
MB:=MetabaseClass.Active;
ObjDesc:=MB.ItemById("Obj_1");
SecDesc:=ObjDesc.SecurityDescriptor;
SecDesc.Edit;
AcessCL:=SecDesc.Acl;
If AcessCL.Remove(2) Then
s:="Yes";
Else
s:="No";
End If;
SecDesc.Apply(True);
End Sub Main;
После выполнения примера в переменной "s" будет содержаться "Yes", если удаление третьего дополнительного параметра безопасности объекта прошло удачно.
См. также: