Append(Source: IAccessControlList);
Source. Additional security parameters of the source object.
The Append method is a part of additional security parameters of the object.
Executing the example requires that the repository contains an object with the OBJ1 and OBJ2 identifiers.
Sub UserProc;
Var
MB: IMetabase;
ObjDesc: IMetabaseObjectDescriptor;
ObjDesc2: IMetabaseObjectDescriptor;
SecDesc: ISecurityDescriptor;
SecDesc2: ISecurityDescriptor;
AcessCL: IAccessControlList;
AcessCL2: IAccessControlList;
Begin
MB:=MetabaseClass.Active;
ObjDesc:=MB.ItemById("OBJ1");
SecDesc:=ObjDesc.SecurityDescriptor;
SecDesc.Edit;
AcessCL:=SecDesc.Acl;
ObjDesc2:=MB.ItemById("OBJ2");
SecDesc2:=ObjDesc2.SecurityDescriptor;
AcessCL2:=SecDesc2.Acl;
AcessCL.Append(AcessCL2);
SecDesc.Apply(True);
End Sub UserProc;
After executing the example the additional security parameters of the OBJ1 object will be appended by the OBJ2 additional parameters.
See also: