IMetabaseObjectDescriptor.MoveTo

Синтаксис

MoveTo(Dest: IMetabaseObjectDescriptor);

MoveTo(Dest: Prognoz.Platform.Interop.Metabase.IMetabaseObjectDescriptor);

Параметры

Dest. Объект репозитория, в который необходимо скопировать объект.

Описание

Метод MoveTo осуществляет перенос одного объекта репозитория в другой.

Комментарии

Объект-приемник должен быть не листьевым элементом репозитория.

Пример

В репозитории добавьте 2 папки с идентификаторами «FOLDER1» и «FOLDER2».

Добавьте ссылку на системную сборку Metabase.

Sub UserProc;
Var
    MB: IMetabase;
    MObj: IMetabaseObjectDescriptor;
    MObj2: IMetabaseObjectDescriptor;
Begin
    MB := MetabaseClass.Active;
    MObj := MB.ItemById("FOLDER1") As IMetabaseObjectDescriptor;
    MObj2 := MB.ItemById("FOLDER2") As IMetabaseObjectDescriptor;
    MObj.MoveTo(MObj2);
End Sub UserProc;
Public Shared Sub Main(Params: StartParams);
Var
    MB: IMetabase;
    MObj: IMetabaseObjectDescriptor;
    MObj2: IMetabaseObjectDescriptor;
Begin
    MB := Params.Metabase;
    MObj := MB.ItemById["FOLDER1"] As IMetabaseObjectDescriptor;
    MObj2 := MB.ItemById["FOLDER2"] As IMetabaseObjectDescriptor;
    MObj.MoveTo[MObj2];
End Sub;

В результат выполнения примера папка «FOLDER1» вложится в папку «FOLDER2».

См. также:

IMetabaseObjectDescriptor