Дерево.Свернуть (TreeView.Collapse) Метод

Копировать

Перем ТФ, Дерево1, Узел6;

Процедура ПриОткрытии() Экспорт
	Дерево1.Перейти(Узел6);
	Дерево1.Свернуть();
	МожноРазвернуть = Дерево1.МожноРазвернуть(Узел6);
	ТФ.Уведомление().Показать("МожноРазвернуть = "+ МожноРазвернуть, -1);
КонецПроцедуры

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

Дерево1 = ТФ.Дерево(, 6, 40, 15);
Дерево1.ЦветоваяСхема = ТФ.ЦветоваяСхема();
Дерево1.ЦветоваяСхема.Нормальный = ТФ.Атрибут(ТФ.Цвет.Черный, ТФ.Цвет.Серый);
Дерево1.ЦветоваяСхема.Фокус = ТФ.Атрибут(ТФ.Цвет.Синий, ТФ.Цвет.ЯркоГолубой);
ТФ.Верхний.Добавить(Дерево1);

Узел1 = Дерево1.ДобавитьУзел(ТФ.УзелДерева("Узел1"));
Узел2 = Дерево1.ДобавитьУзел(ТФ.УзелДерева("Узел2"));
Узел3 = Дерево1.ДобавитьУзел(ТФ.УзелДерева("Узел3"));
Узел4 = Узел1.Добавить(ТФ.УзелДерева("Узел4"));
Узел5 = Узел1.Добавить(ТФ.УзелДерева("Узел5"));
Узел6 = Узел1.Добавить(ТФ.УзелДерева("Узел6"));
Узел7 = Узел6.Добавить(ТФ.УзелДерева("Узел7"));
Узел8 = Узел6.Добавить(ТФ.УзелДерева("Узел8"));

Дерево1.РазвернутьВсе();

ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии");

ТФ.Запуск();

Копировать

Перем ТФ, Дерево1, МожноРазвернуть, Узел6;

Процедура ПриОткрытии() Экспорт
	Дерево1.Перейти(Узел6);
	Дерево1.Свернуть();
	МожноРазвернуть = Дерево1.МожноРазвернуть(Узел6);
	ТФ.Уведомление().Показать("МожноРазвернуть = "+ МожноРазвернуть, -1);
КонецПроцедуры

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

Дерево1 = ТФ.Дерево(, 6, 40, 15);
Дерево1.ЦветоваяСхема = ТФ.ЦветоваяСхема();
Дерево1.ЦветоваяСхема.Нормальный = ТФ.Атрибут(ТФ.Цвет.Черный, ТФ.Цвет.Серый);
Дерево1.ЦветоваяСхема.Фокус = ТФ.Атрибут(ТФ.Цвет.Синий, ТФ.Цвет.ЯркоГолубой);
ТФ.Верхний.Добавить(Дерево1);

Узел1 = Дерево1.ДобавитьУзел(ТФ.УзелДерева("Узел1"));
Узел2 = Дерево1.ДобавитьУзел(ТФ.УзелДерева("Узел2"));
Узел3 = Дерево1.ДобавитьУзел(ТФ.УзелДерева("Узел3"));
Узел4 = Узел1.Добавить(ТФ.УзелДерева("Узел4"));
Узел5 = Узел1.Добавить(ТФ.УзелДерева("Узел5"));
Узел6 = Узел1.Добавить(ТФ.УзелДерева("Узел6"));
Узел7 = Узел6.Добавить(ТФ.УзелДерева("Узел7"));
Узел8 = Узел6.Добавить(ТФ.УзелДерева("Узел8"));

Дерево1.РазвернутьВсе();

ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии");
ТФ.ЗапуститьИЗавершить();

Сообщить(?(
МожноРазвернуть
, "", "!!! ") + "Дерево.Свернуть (TreeView.Collapse) Метод" + " " + ТекущаяДата() + Символы.ПС);