IAccessControlList.Assign

Синтаксис

Assign(Source: IAccessControlList);

Параметры

Source. Дополнительные параметры безопасности объекта-источника.

Описание

Метод Assign заменяет дополнительные параметры безопасности объекта.

Пример

Для выполнения примера предполагается наличие в репозитории объекта с идентификатором «OBJ1» и «OBJ2».

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("NSI");
        SecDesc2:=ObjDesc2.SecurityDescriptor;
        AcessCL2:=SecDesc2.Acl; 
        AcessCL.Assign(AcessCL2);
        SecDesc.Apply(True);
End Sub UserProc;

После выполнения примера дополнительные параметры безопасности объекта «OBJ1» заменятся дополнительными параметрами «OBJ2».

См. также:

IAccessControlList