РадиусГраницы.ПравыйРадиусВерхнейГраницы (BorderRadius.BorderTopRightRadius) Свойство

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

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

РадиусГраницы1 = ДФ.РадиусГраницы();
РадиусГраницы1.ЛевыйРадиусВерхнейГраницы = 10;
РадиусГраницы1.ПравыйРадиусВерхнейГраницы = 10;
РадиусГраницы1.ПравыйРадиусНижнейГраницы = 20;
РадиусГраницы1.ЛевыйРадиусНижнейГраницы = 20;
Сообщить("РадиусГраницы1.ЛевыйРадиусВерхнейГраницы = " + РадиусГраницы1.ЛевыйРадиусВерхнейГраницы);
Сообщить("РадиусГраницы1.ПравыйРадиусВерхнейГраницы = " + РадиусГраницы1.ПравыйРадиусВерхнейГраницы);
Сообщить("РадиусГраницы1.ПравыйРадиусНижнейГраницы = " + РадиусГраницы1.ПравыйРадиусНижнейГраницы);
Сообщить("РадиусГраницы1.ЛевыйРадиусНижнейГраницы = " + РадиусГраницы1.ЛевыйРадиусНижнейГраницы);

РадиусГраницы2 = ДФ.РадиусГраницы(10, 10, 20, 20);
Сообщить("РадиусГраницы2.ЛевыйРадиусВерхнейГраницы = " + РадиусГраницы2.ЛевыйРадиусВерхнейГраницы);
Сообщить("РадиусГраницы2.ПравыйРадиусВерхнейГраницы = " + РадиусГраницы2.ПравыйРадиусВерхнейГраницы);
Сообщить("РадиусГраницы2.ПравыйРадиусНижнейГраницы = " + РадиусГраницы2.ПравыйРадиусНижнейГраницы);
Сообщить("РадиусГраницы2.ЛевыйРадиусНижнейГраницы = " + РадиусГраницы2.ЛевыйРадиусНижнейГраницы);

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