MoveTo(FromIndex: Integer; ToIndex: Integer);
FromIndex. Индекс позиции дополнительного разреза, который необходимо переместить;
ToIndex. Индекс позиции, в которую необходимо переместить.
Метод MoveTo осуществляет перемещение справочника в списке дополнительных разрезов переменной моделирования.
Sub Main;
Var
MB: IMetabase;
MObj: IMetabaseObject;
Variable: IMsVariable;
Dims: IMsVariableDimensions;
Begin
MB := MetabaseClass.Active;
MObj := MB.ItemByIdNamespace("Var_1", MB.ItemById("KONT_MODEL").Key).Edit;
Variable := MObj As IMsVariable;
Dims := Variable.Dimensions;
Dims.MoveTo(0, Dims.Count - 1);
MObj.Save;
End Sub Main;
После выполнения примера первый дополнительный разрез переменной моделирования будет перемещен в списке на последнюю позицию.
См. также: