MoveTo(Dest: IMetabaseObjectDescriptor);
MoveTo (Dest: Prognoz.Platform.Interop.Metabase.IMetabaseObjectDescriptor);
Dest - Объект репозитория, в который необходимо скопировать объект.
Метод MoveTo осуществляет перенос одного объекта репозитория в другой.
Объект-приемник должен быть не листьевым элементом репозитория.
Для выполнения примера добавьте ссылки на системные сборки «Metabase». В репозитории добавьте 2 папки с идентификаторами «FOLDER» и «FOLDER2».
Sub Main;
Var
MB: IMetabase;
MObj: IMetabaseObjectDescriptor;
MObj2: IMetabaseObjectDescriptor;
Begin
MB := MetabaseClass.Active;
MObj := MB.ItemById("FOLDER") As IMetabaseObjectDescriptor;
MObj2 := MB.ItemById("FOLDER2") As IMetabaseObjectDescriptor;
MObj.MoveTo(MObj2);
End Sub Main;
В результат выполнения примера папка «FOLDER» вложится в папку «FOLDER2».
Для выполнения примера добавьте ссылки на системные сборки «Metabase». В репозитории добавьте 2 папки с идентификаторами «FOLDER» и «FOLDER2».
Sub Main(Params: StartParams);
Var
MB: IMetabase;
MObj: IMetabaseObjectDescriptor;
MObj2: IMetabaseObjectDescriptor;
Begin
MB := Params.Metabase;
MObj := MB.ItemById["FOLDER"] As IMetabaseObjectDescriptor;
MObj2 := MB.ItemById["FOLDER2"] As IMetabaseObjectDescriptor;
MObj.MoveTo(MObj2);
End Sub Main;
В результат выполнения примера папка «FOLDER» вложится в папку «FOLDER2».
См. также: