IndexOf(Value: IMsScenarioTreeEntry): Integer;
Value. Элемент дерева сценариев, индекс которого необходимо получить.
Метод IndexOf возвращает индекс элемента в дереве сценариев.
Sub Main;
Var
MB: IMetabase;
MObj: IMetabaseObject;
ModelSpace: IMsModelSpace;
Tree: IMsScenarioTreeEntries;
Folder: IMsScenarioTreeFolder;
Begin
MB := MetabaseClass.Active;
MObj := MB.ItemById("KONT_MODEL").Edit;
ModelSpace := MObj As IMsModelSpace;
Tree := ModelSpace.ScenarioTree;
Folder := Tree.AddFolder("Папка №1");
Tree.MoveTo(Tree.IndexOf(Folder), 0);
MObj.Save;
End Sub Main;
После выполнения примера в дереве сценариев контейнера моделирования будет создана новая папка. Данная папка будет перемещена на первую позицию в списке.
См. также: