IMsScenarioTreeEntry.MoveToParent

Синтаксис

MoveToParent(Parent: IMsScenarioTreeEntries; Index: Integer);

Параметры

Parent. Родительское дерево сценариев.

Index. Позиция в которую необходимо переместить элемент.

Описание

Метод MoveToParent осуществляет перемещение элемента дерева сценариев.

Пример

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

Sub Main;

Var

Mb: IMetabase;

ModelSpace: IMsModelSpace;

Tree: IMsScenarioTreeEntries;

TreeEntries: IMsScenarioTreeEntry;

Begin

Mb := MetabaseClass.Active;

ModelSpace := Mb.ItemById("OBJ_CONT").Edit As IMsModelSpace;

Tree := ModelSpace.ScenarioTree;

TreeEntries := Tree.Item(Tree.Count - 1);

TreeEntries.MoveToParent(Tree, 0);

(ModelSpace As IMetabaseObject).Save;

End Sub Main;

После выполнения примера последний элемент дерева сценариев будет перемещен в начальную позицию.

См. также:

IMsScenarioTreeEntry