IDynamicInstance.RearrangeChildren

Синтаксис Fore

RearrangeChildren(Parent: Integer; Childs: Array): Boolean;

Синтаксис Fore.NET

RearrangeChildren(Parent: uinteger; Childs: System.Array): boolean;

Параметры

Parent. Индекс элемента-родителя;

Childs. Массив дочерних элементов.

Описание

Метод RearrangeChildren упорядочивает элементы, принадлежащие указанному родительскому элементу и расположенные на одном уровне.

Пример Fore

Для выполнения примера предполагается наличие формы, содержащей компонент DimensionTree с идентификатором «DimensionTree1», компонент UiDimension с идентификатором «UiDimension1» и компонент Button с идентификатором «Button1». Укажите компонент «UiDimension1» в качестве источника данных для компонента «DimensionTree1». Источником данных компонента «UiDimension1» должен быть табличный справочник НСИ с настроенной динамической загрузкой элементов.

Пример является обработчиком события OnClick для компонента «Button1».

Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
    Dim: IDynamicInstance;
    Element: Integer;
Begin
    Dim := UiDimension1.DimInstance As IDynamicInstance;
    Element := DimensionTree1.FocusedElement;
    If Dim.HasLoadedChildren(Element) Then
        Dim.RearrangeChildren(Element, Dim.LoadedChildren(Element));
        Else
            Dim.RearrangeChildren(Element, Dim.UnloadedChildren(Element));
    End If;
End Sub Button1OnClick;

При нажатии на кнопку «Button1» дочерние элементы выделенного пользователем элемента-родителя будут упорядочены.

Пример Fore.NET

Необходимые требования и результат выполнения примера Fore.NET совпадают с примером Fore. Вместо компонентов Fore используйте их Fore.NET аналоги.

Imports Prognoz.Platform.Interop.Dimensions;
…
Private Sub button1_Click(sender: System.Object; e: System.EventArgs);
Var
    Dim: IDynamicInstance;
    Element: uinteger;
    Array: System.Array; 
Begin
    Dim := uiDimensionNet1.DimInstance As IDynamicInstance;
    Element := dimensionTreeNet1.FocusedElement;
    If Dim.HasLoadedChildren(Element) Then
        Array := Dim.LoadedChildren[Element];
        Dim.RearrangeChildren(Element, Array);
        Else
            Array := Dim.UnoadedChildren[Element];
            Dim.RearrangeChildren(Element, Array);
    End If;
End Sub;

См. также:

IDynamicInstance