Пример программного создания условного оформления управляемой формы

24 Jul
Published by Nicholas

// Первый вариант

ЭлементУсловногоОформления = УсловноеОформление.Элементы.Добавить();

ЭлементОтбора = ЭлементУсловногоОформления.Отбор.Элементы.Добавить(Тип("ЭлементОтбораКомпоновкиДанных"));
ЭлементОтбора.ЛевоеЗначение = Новый ПолеКомпоновкиДанных("НастройкиПоставщиков.Поставщик");
ЭлементОтбора.ВидСравнения = ВидСравненияКомпоновкиДанных.НеЗаполнено;
ЭлементОтбора.Использование = Истина;
ЭлементОтбора = ЭлементУсловногоОформления.Отбор.Элементы.Добавить(Тип("ЭлементОтбораКомпоновкиДанных"));
ЭлементОтбора.ЛевоеЗначение = Новый ПолеКомпоновкиДанных("НастройкиПоставщиков.НаименованиеПоставщика");
ЭлементОтбора.ВидСравнения = ВидСравненияКомпоновкиДанных.Содержит;
ЭлементОтбора.ПравоеЗначение = СтрокаНастроек.НаименованиеПоставщика;
ЭлементОтбора.Использование = Истина;

ЭлементУсловногоОформления.Оформление.УстановитьЗначениеПараметра("Текст", СтрокаНастроек.НаименованиеПоставщика);
ЭлементУсловногоОформления.Оформление.УстановитьЗначениеПараметра("ЦветТекста", ЦветаСтиля.НезаполненноеПолеТаблицы);
ЭлементУсловногоОформления.Оформление.УстановитьЗначениеПараметра("Шрифт", Новый Шрифт(, , , Истина));
ЭлементУсловногоОформления.Оформление.УстановитьЗначениеПараметра("ОтметкаНезаполненного", Истина);

ПолеУсловногоОформления = ЭлементУсловногоОформления.Поля.Элементы.Добавить();
ПолеУсловногоОформления.Поле = Новый ПолеКомпоновкиДанных(Элементы.НастройкиПоставщиков.Имя);
ПолеУсловногоОформления.Использование = Истина;

// Второй вариант

ЭлементУсловногоОформления = УсловноеОформление.Элементы.Добавить();

ОбщегоНазначенияКлиентСервер.ДобавитьЭлементКомпоновки(
   
ЭлементУсловногоОформления.Отбор,
   
"НастройкиПоставщиков.Поставщик",
   
ВидСравненияКомпоновкиДанных.НеЗаполнено
);
ОбщегоНазначенияКлиентСервер.ДобавитьЭлементКомпоновки(
   
ЭлементУсловногоОформления.Отбор,
   
"НастройкиПоставщиков.НаименованиеПоставщика",
   
ВидСравненияКомпоновкиДанных.Содержит,
   
СтрокаНастроек.НаименованиеПоставщика
);

ЭлементУсловногоОформления.Оформление.УстановитьЗначениеПараметра("Текст", СтрокаНастроек.НаименованиеПоставщика);
ЭлементУсловногоОформления.Оформление.УстановитьЗначениеПараметра("ЦветТекста", ЦветаСтиля.НезаполненноеПолеТаблицы);
ЭлементУсловногоОформления.Оформление.УстановитьЗначениеПараметра("Шрифт", Новый Шрифт(, , , Истина));
ЭлементУсловногоОформления.Оформление.УстановитьЗначениеПараметра("ОтметкаНезаполненного", Истина);

КомпоновкаДанныхКлиентСервер.ДобавитьОформляемоеПоле(ЭлементУсловногоОформления.Поля, "НастройкиПоставщиков");

Тэги 

1С 8.3

Добавить комментарий

Plain text

  • HTML-теги не обрабатываются и показываются как обычный текст
  • Строки и абзацы переносятся автоматически.
CAPTCHA
Вы человек или автоматическая спам-рассылка?
Target Image