УзелДереваЗначенийАрг.Узел (TreeNodeAdvMouseEventArgs.Node) Свойство

Использование

Только чтение.

Значение

Тип: УзелДереваЗначений (TreeNodeAdv).

Возвращает объект УзелДереваЗначений (TreeNodeAdv).

Примечание

Пример

УзелДереваЗначенийАрг = Ф.АргументыСобытия;
Узел = УзелДереваЗначенийАрг.Узел;
Полный пример кода 

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


Перем Ф, Форма1, Узел;

Процедура ДеревоЗначений1_ПриНажатииУзла() Экспорт
	УзелДереваЗначенийАрг = Ф.АргументыСобытия;
	Узел = УзелДереваЗначенийАрг.Узел;
	Сообщить("Узел = " + Узел);
КонецПроцедуры

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

ДеревоЗначений1 = Ф.ДеревоЗначений();
ДеревоЗначений1.Родитель = Форма1;
ДеревоЗначений1.Стыковка = Ф.СтильСтыковки.Заполнение;

ДеревоЗначений1.ПриНажатииУзла = Ф.Действие(ЭтотОбъект, "ДеревоЗначений1_ПриНажатииУзла");

КолонкаДереваЗначений1 = Ф.КолонкаДереваЗначений("Небесные тела", 220);
КолонкаДереваЗначений2 = Ф.КолонкаДереваЗначений("Радиус орбиты (а.е.)", 200);
КолонкаДереваЗначений1.ВыравниваниеТекста = Ф.ГоризонтальноеВыравнивание.Центр;
КолонкаДереваЗначений2.ВыравниваниеТекста = Ф.ГоризонтальноеВыравнивание.Центр;

ДеревоЗначений1.Колонки.Добавить(КолонкаДереваЗначений1);
ДеревоЗначений1.Колонки.Добавить(КолонкаДереваЗначений2);
ДеревоЗначений1.ИспользоватьКолонки = Истина;
ДеревоЗначений1.СтильСетки = Ф.СтильСетки.ГоризонтальнаяВертикальная;

ФлажокУзла1 = Ф.ФлажокУзла();
ФлажокУзла1.Колонка = КолонкаДереваЗначений1;
ФлажокУзла1.Редактируемый = Истина;
ФлажокУзла1.ТриСостояния = Истина;

ПолеВводаУзла1 = Ф.ПолеВводаУзла();
ПолеВводаУзла1.Колонка = КолонкаДереваЗначений1;

ЧисловоеПолеУзла1 = Ф.ЧисловоеПолеУзла();
ЧисловоеПолеУзла1.Колонка = КолонкаДереваЗначений2;
ЧисловоеПолеУзла1.ВыравниваниеТекста = Ф.ГоризонтальноеВыравнивание.Центр;

ДеревоЗначений1.ЭлементыУзла.Добавить(ФлажокУзла1);
ДеревоЗначений1.ЭлементыУзла.Добавить(ПолеВводаУзла1);
ДеревоЗначений1.ЭлементыУзла.Добавить(ЧисловоеПолеУзла1);

СолнечнаяСистема = Ф.УзелДереваЗначений("Солнечная система");
ДеревоЗначений1.Узлы.Добавить(СолнечнаяСистема);
СолнечнаяСистема.УстановитьЗначение(ПолеВводаУзла1, "Солнечная система");

Солнце = Ф.УзелДереваЗначений("Солнце");
СолнечнаяСистема.Узлы.Добавить(Солнце);
Солнце.УстановитьЗначение(ПолеВводаУзла1, "Солнце");

Меркурий = Ф.УзелДереваЗначений("Меркурий");
Солнце.Узлы.Добавить(Меркурий);
Меркурий.УстановитьЗначение(ПолеВводаУзла1, "Меркурий");
Меркурий.УстановитьЗначение(ЧисловоеПолеУзла1, 0.39);

Венера = Ф.УзелДереваЗначений("Венера");
Солнце.Узлы.Добавить(Венера);
Венера.УстановитьЗначение(ПолеВводаУзла1, "Венера");
Венера.УстановитьЗначение(ЧисловоеПолеУзла1, 0.72);

Земля = Ф.УзелДереваЗначений("Земля");
Солнце.Узлы.Добавить(Земля);
Земля.УстановитьЗначение(ПолеВводаУзла1, "Земля");
Земля.УстановитьЗначение(ЧисловоеПолеУзла1, 1.0);

Марс = Ф.УзелДереваЗначений("Марс");
Солнце.Узлы.Добавить(Марс);
Марс.УстановитьЗначение(ПолеВводаУзла1, "Марс");
Марс.УстановитьЗначение(ЧисловоеПолеУзла1, 1.52);

Юпитер = Ф.УзелДереваЗначений("Юпитер");
Солнце.Узлы.Добавить(Юпитер);
Юпитер.УстановитьЗначение(ПолеВводаУзла1, "Юпитер");
Юпитер.УстановитьЗначение(ЧисловоеПолеУзла1, 5.20);

Сатурн = Ф.УзелДереваЗначений("Сатурн");
Солнце.Узлы.Добавить(Сатурн);
Сатурн.УстановитьЗначение(ПолеВводаУзла1, "Сатурн");
Сатурн.УстановитьЗначение(ЧисловоеПолеУзла1, 9.54);

Уран = Ф.УзелДереваЗначений("Уран");
Солнце.Узлы.Добавить(Уран);
Уран.УстановитьЗначение(ПолеВводаУзла1, "Уран");
Уран.УстановитьЗначение(ЧисловоеПолеУзла1, 19.22);

Нептун = Ф.УзелДереваЗначений("Нептун");
Солнце.Узлы.Добавить(Нептун);
Нептун.УстановитьЗначение(ПолеВводаУзла1, "Нептун");
Нептун.УстановитьЗначение(ЧисловоеПолеУзла1, 30.06);

ДеревоЗначений1.РазвернутьВсе();
ДеревоЗначений1.ВыбранныйУзел = Нептун;

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

Тестовый код 

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


Перем Ф, ГраницыЭлементаУзла, Модификаторы, Положение, Узел, ЭлементУзла;

Процедура ДеревоЗначений1_ПриНажатииУзла() Экспорт
	УзелДереваЗначенийАрг = Ф.АргументыСобытия;
	ГраницыЭлементаУзла = УзелДереваЗначенийАрг.ГраницыЭлементаУзла;
	Модификаторы = УзелДереваЗначенийАрг.Модификаторы;
	Положение = УзелДереваЗначенийАрг.Положение;
	Узел = УзелДереваЗначенийАрг.Узел;
	ЭлементУзла = УзелДереваЗначенийАрг.ЭлементУзла;
	
	// Сообщить("ГраницыЭлементаУзла.Икс = " + ГраницыЭлементаУзла.Икс);
	// Сообщить("ГраницыЭлементаУзла.Игрек = " + ГраницыЭлементаУзла.Игрек);
	// Сообщить("ГраницыЭлементаУзла.Ширина = " + ГраницыЭлементаУзла.Ширина);
	// Сообщить("ГраницыЭлементаУзла.Высота = " + ГраницыЭлементаУзла.Высота);
	// Сообщить("Модификаторы = " + Модификаторы);
	// Сообщить("Положение.Икс = " + Положение.Икс);
	// Сообщить("Положение.Игрек = " + Положение.Игрек);
	// Сообщить("Узел = " + Узел);
	// Сообщить("ЭлементУзла = " + ЭлементУзла);
КонецПроцедуры

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

ДеревоЗначений1 = Ф.ДеревоЗначений();
ДеревоЗначений1.Родитель = Форма1;
ДеревоЗначений1.Стыковка = Ф.СтильСтыковки.Заполнение;

ДеревоЗначений1.ПриНажатииУзла = Ф.Действие(ЭтотОбъект, "ДеревоЗначений1_ПриНажатииУзла");

КолонкаДереваЗначений1 = Ф.КолонкаДереваЗначений("Небесные тела", 220);
КолонкаДереваЗначений2 = Ф.КолонкаДереваЗначений("Радиус орбиты (а.е.)", 200);
КолонкаДереваЗначений1.ВыравниваниеТекста = Ф.ГоризонтальноеВыравнивание.Центр;
КолонкаДереваЗначений2.ВыравниваниеТекста = Ф.ГоризонтальноеВыравнивание.Центр;

ДеревоЗначений1.Колонки.Добавить(КолонкаДереваЗначений1);
ДеревоЗначений1.Колонки.Добавить(КолонкаДереваЗначений2);
ДеревоЗначений1.ИспользоватьКолонки = Истина;
ДеревоЗначений1.СтильСетки = Ф.СтильСетки.ГоризонтальнаяВертикальная;

ФлажокУзла1 = Ф.ФлажокУзла();
ФлажокУзла1.Колонка = КолонкаДереваЗначений1;
ФлажокУзла1.Редактируемый = Истина;
ФлажокУзла1.ТриСостояния = Истина;

ПолеВводаУзла1 = Ф.ПолеВводаУзла();
ПолеВводаУзла1.Колонка = КолонкаДереваЗначений1;

ЧисловоеПолеУзла1 = Ф.ЧисловоеПолеУзла();
ЧисловоеПолеУзла1.Колонка = КолонкаДереваЗначений2;
ЧисловоеПолеУзла1.ВыравниваниеТекста = Ф.ГоризонтальноеВыравнивание.Центр;

ДеревоЗначений1.ЭлементыУзла.Добавить(ФлажокУзла1);
ДеревоЗначений1.ЭлементыУзла.Добавить(ПолеВводаУзла1);
ДеревоЗначений1.ЭлементыУзла.Добавить(ЧисловоеПолеУзла1);

СолнечнаяСистема = Ф.УзелДереваЗначений("Солнечная система");
ДеревоЗначений1.Узлы.Добавить(СолнечнаяСистема);
СолнечнаяСистема.УстановитьЗначение(ПолеВводаУзла1, "Солнечная система");

Солнце = Ф.УзелДереваЗначений("Солнце");
СолнечнаяСистема.Узлы.Добавить(Солнце);
Солнце.УстановитьЗначение(ПолеВводаУзла1, "Солнце");

Меркурий = Ф.УзелДереваЗначений("Меркурий");
Солнце.Узлы.Добавить(Меркурий);
Меркурий.УстановитьЗначение(ПолеВводаУзла1, "Меркурий");
Меркурий.УстановитьЗначение(ЧисловоеПолеУзла1, 0.39);

Венера = Ф.УзелДереваЗначений("Венера");
Солнце.Узлы.Добавить(Венера);
Венера.УстановитьЗначение(ПолеВводаУзла1, "Венера");
Венера.УстановитьЗначение(ЧисловоеПолеУзла1, 0.72);

Земля = Ф.УзелДереваЗначений("Земля");
Солнце.Узлы.Добавить(Земля);
Земля.УстановитьЗначение(ПолеВводаУзла1, "Земля");
Земля.УстановитьЗначение(ЧисловоеПолеУзла1, 1.0);

Марс = Ф.УзелДереваЗначений("Марс");
Солнце.Узлы.Добавить(Марс);
Марс.УстановитьЗначение(ПолеВводаУзла1, "Марс");
Марс.УстановитьЗначение(ЧисловоеПолеУзла1, 1.52);

Юпитер = Ф.УзелДереваЗначений("Юпитер");
Солнце.Узлы.Добавить(Юпитер);
Юпитер.УстановитьЗначение(ПолеВводаУзла1, "Юпитер");
Юпитер.УстановитьЗначение(ЧисловоеПолеУзла1, 5.20);

Сатурн = Ф.УзелДереваЗначений("Сатурн");
Солнце.Узлы.Добавить(Сатурн);
Сатурн.УстановитьЗначение(ПолеВводаУзла1, "Сатурн");
Сатурн.УстановитьЗначение(ЧисловоеПолеУзла1, 9.54);

Уран = Ф.УзелДереваЗначений("Уран");
Солнце.Узлы.Добавить(Уран);
Уран.УстановитьЗначение(ПолеВводаУзла1, "Уран");
Уран.УстановитьЗначение(ЧисловоеПолеУзла1, 19.22);

Нептун = Ф.УзелДереваЗначений("Нептун");
Солнце.Узлы.Добавить(Нептун);
Нептун.УстановитьЗначение(ПолеВводаУзла1, "Нептун");
Нептун.УстановитьЗначение(ЧисловоеПолеУзла1, 30.06);

ДеревоЗначений1.РазвернутьВсе();
ДеревоЗначений1.ВыбранныйУзел = Нептун;

Ф.РазрешитьСобытия = Истина;

Позиция = Ф.Точка(192, 158);
Словарь1 = Ф.Словарь();
Словарь1.Добавить("Кнопка", (Ф.ФлагиМыши.ЛеваяВниз + Ф.ФлагиМыши.ЛеваяВверх));
Словарь1.Добавить("Нажатия", 1);
Словарь1.Добавить("Икс", Позиция.Икс);
Словарь1.Добавить("Игрек", Позиция.Игрек);
Словарь1.Добавить("ГраницыЭлементаУзла", Ф.Прямоугольник(74, 144, 146, 16));
Словарь1.Добавить("Модификаторы", 0);
Словарь1.Добавить("Положение", Ф.Точка(187, 153));
Словарь1.Добавить("Узел", Нептун);
Словарь1.Добавить("ЭлементУзла", ПолеВводаУзла1);

Ф.ВызватьСобытие(ДеревоЗначений1, "ПриНажатииУзла", Словарь1);

Сообщить(?(
"" + Узел = "КлУзелДереваЗначений"
, "", "!!! ") + "УзелДереваЗначенийАрг.Узел (TreeNodeAdvMouseEventArgs.Node) Свойство" + " " + ТекущаяДата());

Смотрите также

УзелДереваЗначенийАрг (TreeNodeAdvMouseEventArgs) Класс | Библиотека OneScriptForms