Дерево.ПрокрутитьВверх (TreeView.ScrollUp) Метод

Копировать

Перем ТФ, Дерево1;

Процедура ПриОткрытии() Экспорт
	Дерево1.ПерейтиВКонец();
	Дерево1.ПрокрутитьВверх();
	Дерево1.ПрокрутитьВверх();
	Дерево1.ПрокрутитьВверх();
КонецПроцедуры

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

Дерево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"));

Для А = 9 По 60 Цикл
	Дерево1.ДобавитьУзел(ТФ.УзелДерева("Узел" + А));
КонецЦикла;

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

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

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

Копировать

Перем ТФ, Дерево1, Успешно;

Процедура ПриОткрытии() Экспорт
	Дерево1.ПерейтиВКонец();
	Дерево1.ПрокрутитьВверх();
	Дерево1.ПрокрутитьВверх();
	Дерево1.ПрокрутитьВверх();
КонецПроцедуры

Процедура Кнопка1_Нажатие() Экспорт
	Успешно = Истина;
	ТФ.Завершить();
КонецПроцедуры

Процедура Кнопка2_Нажатие() Экспорт
	Успешно = Ложь;
	ТФ.Завершить();
КонецПроцедуры

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

Дерево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.Граница = ТФ.Граница(ТФ.СтильГраницы.Закругленная);
Кнопка1.ВышеПравее(Дерево1, -(Кнопка1.Кадр.Высота + 2), 1);
Кнопка1.Нажатие = ТФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");

Кнопка2 = ТФ.Верхний.Добавить(ТФ.Кнопка("Нет"));
Кнопка2.Граница = ТФ.Граница(ТФ.СтильГраницы.Закругленная);
Кнопка2.НижеПравее(Кнопка1, 1, -(Кнопка2.Кадр.Ширина + 1));
Кнопка2.Нажатие = ТФ.Действие(ЭтотОбъект, "Кнопка2_Нажатие");

Для А = 9 По 60 Цикл
	Дерево1.ДобавитьУзел(ТФ.УзелДерева("Узел" + А));
КонецЦикла;

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

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

Сообщить(?(
Успешно
, "", "!!! ") + "Дерево.ПрокрутитьВверх (TreeView.ScrollUp) Метод" + " " + ТекущаяДата() + Символы.ПС);