Контекст2d.ЗаполнитьТекст (Context2d.FillText) Метод

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

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

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

Контекст2d1 = Холст1.Контекст2d;
Шрифт1 = ДФ.Шрифт( , , , 24, , "serif");
// Шрифт1 = ДФ.Шрифт();
// Шрифт1.СтильШрифта = ДФ.СтильШрифта.Курсив;
// Шрифт1.ЖирностьШрифта = ДФ.ЖирностьШрифта.Жирный;
// Шрифт1.РазмерШрифта = 20;
// Шрифт1.ВысотаСтроки = 50;
// Шрифт1.СемействоШрифтов = "serif";
Контекст2d1.Шрифт = Шрифт1;

Контекст2d1.НаправлениеТекста = ДФ.Направление.СлеваНаправо;
Контекст2d1.ЗаполнитьТекст("OneScript", 150, 50);

Контекст2d1.НаправлениеТекста = ДФ.Направление.СправаНалево;
Контекст2d1.ЗаполнитьТекст("OneScript", 150, 60);

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