Стиль.ЦветКурсора (Style.CaretColor) Свойство

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

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

ПолеТекста1 = ДФ.ПолеТекста();
ПолеТекста1.Родитель = Форма1;
ПолеТекста1.Стиль.Ширина = 300;
ПолеТекста1.Значение = "ПолеТекста1 ПолеТекста1";
ПолеТекста1.Автофокус = Истина;

ПолеТекста1.Стиль.ЦветКурсора = ДФ.Цвет.Красный;

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