Стиль.ВерхняяГраница (Style.BorderTop) Свойство

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

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

Блок1 = Форма1.ДобавитьДочерний(ДФ.Блок());
Блок1.Стиль.Ширина = 150;
Блок1.Стиль.Высота = 150;
Блок1.Стиль.ЦветФона = ДФ.Цвет.БледноБирюзовый;

Блок1.Стиль.ВерхняяГраница = ДФ.ВерхняяГраница(4, ДФ.СтильГраницы.Двойная, ДФ.Цвет.Красный);

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