РадиальныйГрадиент.ДобавитьОстановкуГрадиента (RadialGradient.AddColorStop) Метод

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

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

Холст1 = Форма1.ДобавитьДочерний(ДФ.Холст());
Холст1.Стиль.Границы = ДФ.Границы(ДФ.ШиринаГраницы.Тонкая, ДФ.СтильГраницы.Сплошная, ДФ.Цвет.Черный);

РадиальныйГрадиент1 = Холст1.Контекст2d.СоздатьРадиальныйГрадиент(75, 50, 5, 90, 60, 100);
РадиальныйГрадиент1.ДобавитьОстановкуГрадиента(0, ДФ.Цвет.Красный);
РадиальныйГрадиент1.ДобавитьОстановкуГрадиента(1, ДФ.Цвет.Белый);
Холст1.Контекст2d.СтильЗаполнения = РадиальныйГрадиент1;
Холст1.Контекст2d.ЗаполнитьПрямоугольник(10, 10, 150, 100);

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