Clear;
The Clear method clears the list of access control elements.
Executing the example requires that the repository contains an object with the OBJ_1 identifier.
Add a link to the Metabase system assembly.
Sub UserProc;
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 UserProc;
After executing the example a list of users who have access permissions for the object with OBJ_1 identifier is cleared.
See also: