Стиль.ПоложениеКартинки (Style.BackgroundPosition) Свойство

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

Перем ДФ, Контент, Фон1;

Процедура Кнопка1_Нажатие() Экспорт
	Контент.Стиль.ФоновоеВложение = ДФ.ФоновоеВложение.Фиксировано;
КонецПроцедуры

Процедура Кнопка2_Нажатие() Экспорт
	Контент.Стиль.ФоновоеВложение = ДФ.ФоновоеВложение.Прокрутка;
КонецПроцедуры

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

Контент = Форма1.Контент;

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

Кнопка2 = Контент.ДобавитьДочерний(ДФ.Кнопка());
Кнопка2.Текст = "ФоновоеВложение = Прокрутка";
Кнопка2.Нажатие = ДФ.Действие(ЭтотОбъект, "Кнопка2_Нажатие");
Кнопка2.Стиль.ОтступСлева = 25;

Для А = 0 По 15 Цикл
	Контент.ДобавитьДочерний(ДФ.Абзац()).Текст = "Алиса и сама не заметила, как очутилась на каминной полке.";
	Контент.ДобавитьДочерний(ДФ.Перенос());
	Контент.ДобавитьДочерний(ДФ.Перенос());
КонецЦикла;

Контент.Стиль.ЦветФона = ДФ.Цвет(243, 243, 243);
Контент.Стиль.ФоновоеИзображение = "img_flwr.gif";
Контент.Стиль.МозаикаКартинки = ДФ.МозаикаКартинки.НеПовторять;
Контент.Стиль.ПоложениеКартинки = ДФ.ПоложениеКартинки.ВерхПраво;
Контент.Стиль.ОбластьКартинки = ДФ.ОбластьКартинки.Содержимое;
Контент.Стиль.ОбластьРисования = ДФ.ОбластьРисования.Содержимое;
Контент.Стиль.РазмерКартинки = ДФ.Размер(400, 400);
Контент.Стиль.ФоновоеВложение = ДФ.ФоновоеВложение.Прокрутка;

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