IBindingTreeCombo.Nodes

Синтаксис Fore

Nodes: String;

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

Nodes: String;

Описание

Свойство Nodes определяет значение параметра «NODES» в строке связи.

Параметр «NODES» определяет наименования вершин комбинированного дерева. Наименования должны быть разделены с помощью символа-разделителя, заданного в свойстве Separators. В фигурных скобках указываются подэлементы вершины. Пример: "A,{A1,{A11},A2},B,{B1}", в качестве символа-разделителя используется «,».

Свойство Nodes доступно для использования, если свойству NodesDefined установлено значение True. При изменении свойства Nodes свойству NodesDefined автоматически устанавливается значение True.

Пример Fore

Function CreateTreeComboBidning(Nodes: String; Separator: String; DefaultNode: String = ""): String;
Var
    BM: IBindingManager;
    TreeComboBinding: IBindingTreeCombo;
Begin
    BM := New BindingManager.Create;
    TreeComboBinding := BM.CreateByUi("TreeCombo") As IBindingTreeCombo;
    //Вершины
    TreeComboBinding.Nodes := Nodes;
    //Разделитель вершин
    TreeComboBinding.Separators := Separator;
    //Вершина по умолчанию
    If DefaultNode <> "" Then
        TreeComboBinding.Value := DefaultNode;
    End If;
    Return TreeComboBinding.AsString;
End Function CreateTreeComboBidning;

Данная функция генерирует строку связи для использования редактора в виде комбинированного дерева. Вершины дерева и основные настройки дерева передаются посредством входных параметров. Вершины, передаваемые в параметре Nodes, должны быть сформированы в виде строки, формат которой допустим для указания в свойстве Nodes.

Пример Fore.NET

Imports Prognoz.Platform.Interop.ForeSystem;

Function CreateTreeComboBidning(Nodes: String; Separator: String; DefaultNode: String): String;
Var
    BM: BindingManager = New BindingManagerClass();
    TreeComboBinding: IBindingTreeCombo;
Begin
    TreeComboBinding := BM.CreateByUi("TreeCombo") As IBindingTreeCombo;
    //Вершины
    TreeComboBinding.Nodes := Nodes;
    //Разделитель вершин
    TreeComboBinding.Separators := Separator;
    //Вершина по умолчанию
    If DefaultNode <> "" Then
        TreeComboBinding.Value := DefaultNode;
    End If;
    Return TreeComboBinding.AsString;
End Function;

См. также: