Элемент.ПрокрутитьДо (Element.ScrollIntoView) Метод

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

Перем Абзац2;

Процедура Кнопка1_Нажатие() Экспорт
	Сообщить("Кнопка1_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
	Абзац2.ПрокрутитьДо();
КонецПроцедуры

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

Блок1 = ДФ.Блок();
Блок1.Родитель = Форма1;
Стиль1 = Блок1.Стиль;
Блок1.Стиль.Высота = 250;
Блок1.Стиль.Ширина = 250;
Блок1.Стиль.Переполнение = ДФ.Переполнение.Авто;
Блок1.Стиль.ЦветФона = ДФ.Цвет.ГрифельноСиний;

Блок2 = ДФ.Блок();
Блок2.Родитель = Блок1;
Блок2.Стиль.Высота = 850;
Блок2.Стиль.Ширина = 950;
Блок2.Стиль.ЦветФона = ДФ.Цвет.ЦветЗагара;

Абзац1 = Блок2.ДобавитьДочерний(ДФ.Абзац());
Абзац1.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала. " + 
"Раза два она заглянула в книгу, которую читала ее сестра, но там не было ни картинок, ни разговоров. " + 
"«И что за польза от книги, — подумала она, — в которой нет разговоров или картинок?»" + 
"Тут она стала размышлять про себя (правда, с трудом, потому что в такой жаркий день чувствовала себя сонной и глупой), " + 
"стоит ли удовольствие плести венок из маргариток беспокойства идти собирать маргаритки, как вдруг совсем близко от нее, " + 
"пробежал Белый Кролик с розовыми глазами." + 
"В этом не было ничего очень уж замечательного. " + 
"Точно так же Алисе не показалось очень необычным, когда она услышала, как Кролик говорил сам себе:" + 
" - О горе, горе! Я опоздаю! (Позже Алиса вспоминала об этом, и ей пришло на ум, что она должна была бы удивиться, " + 
"но в то время все представлялось ей совершенно естественным.)";

Абзац2 = Блок2.ДобавитьДочерний(ДФ.Абзац());
Абзац2.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";

Абзац3 = Блок2.ДобавитьДочерний(ДФ.Абзац());
Абзац3.Текст = "Алиса начала очень скучать: она сидела рядом с сестрой на берегу и ничего не делала.";

Кнопка1 = ДФ.Кнопка();
Кнопка1.Родитель = Форма1;
Кнопка1.Текст = "ПрокрутитьДо";
Кнопка1.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка1_Нажатие");

Форма1.Открыть();