УзелДерева.Родитель (TreeNode.Parent) Свойство

Копировать     Выделить всё

ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll");
Ф = Новый ФормыДляОдноСкрипта();
Форма1 = Ф.Форма();
Форма1.Отображать = Истина;
Форма1.Показать();
Форма1.Активизировать();

Дерево1 = Форма1.ЭлементыУправления.Добавить(Ф.Дерево());
Дерево1.Ширина = 200;
Узел1 = Дерево1.Узлы.Добавить("Узел1");
Узел2 = Дерево1.Узлы.Добавить("Узел2");
Узел3 = Дерево1.Узлы.Добавить("Узел3");
Узлы1 = Узел1.Узлы;
ПодУзел1 = Узлы1.Добавить("ПодУзел1");
Узлы2 = ПодУзел1.Узлы;
ПодУзел2 = Узлы2.Добавить("ПодУзел2");

Дерево1.ВыбранныйУзел = Узел2;

Сообщить("ПодУзел2.Родитель.Текст = " + ПодУзел2.Родитель.Текст);

Ф.ЗапуститьОбработкуСобытий();

Копировать     Выделить всё

ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll");
Ф = Новый ФормыДляОдноСкрипта();
Форма1 = Ф.Форма();
Форма1.Отображать = Истина;
Форма1.Показать();
Форма1.Активизировать();

Дерево1 = Форма1.ЭлементыУправления.Добавить(Ф.Дерево());
Дерево1.Ширина = 200;
Узел1 = Дерево1.Узлы.Добавить("Узел1");
Узел2 = Дерево1.Узлы.Добавить("Узел2");
Узел3 = Дерево1.Узлы.Добавить("Узел3");
Узлы1 = Узел1.Узлы;
ПодУзел1 = Узлы1.Добавить("ПодУзел1");
Узлы2 = ПодУзел1.Узлы;
ПодУзел2 = Узлы2.Добавить("ПодУзел2");

Дерево1.ВыбранныйУзел = Узел2;

Сообщить(?(
ПодУзел2.Родитель.Текст = "ПодУзел1"
, "", "!!! ") + "УзелДерева.Родитель (TreeNode.Parent) Свойство" + " " + ТекущаяДата());