Стиль.КартинкаГраницы (Style.BorderImage) Свойство

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

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

Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.ЦветФона = ДФ.Цвет.СветлоСерый;
Блок1.Стиль.Границы = ДФ.Границы(30, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Прозрачный);

КартинкаГраницы1 = ДФ.КартинкаГраницы();
КартинкаГраницы1.ИсточникКартинкиГраницы = "border.png";
КартинкаГраницы1.НарезкаКартинкиГраницы = 30;
КартинкаГраницы1.ШиринаКартинкиГраницы = ДФ.Размер(10, 20);
КартинкаГраницы1.СмещениеКартинкиГраницы = 0;
КартинкаГраницы1.МозаикаКартинкиГраницы = ДФ.МозаикаКартинкиГраницы.Закруглять;

Блок1.Стиль.КартинкаГраницы = КартинкаГраницы1;

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