Доброго всем

Подскажите, плз, как раскрасить поле формы при создании/изменении дока?

например, на доке есть поле Контрагент
Выбираем контрагента и в зависимости от условия, поле формы меняло цвет.

Если при открытии то работает. а при изменении/создании нового как?

спс

Процедура ВыделитьКонтрагента(Контрагент)
    Если ЛояльныйКлиент(Контрагент) Тогда
        ЭлементыФормы.Контрагент.ЦветФона = WebЦвета.БледноЗеленый;
    Иначе
        ЭлементыФормы.Контрагент.ЦветФона = Новый Цвет;    
    КонецЕсли;
    
КонецПроцедуры

событие приИзменении()

Стиль:ВырвиГлаз.

Лояльные, бледно-зеленые контры.

(1) стоит в ПриИзменении () и в ПриОткрытии ()

ПриОткрытии работает ПриИзменении - цвет не меняется, хотя в эту процедуру заходит и попадает на ЭлементыФормы.Контрагент.ЦветФона = WebЦвета.БледноЗеленый;

(3) мне скажут рыжим - будет рыжим ))))

После изменения, по точке останова на последней строке ПриИзменении () в отладчике элементыформы.Контрагент.ЦветФона Значение зелёного, но на форме у него обычный цвет

(5) ну можно ещё попробовать обновить форму

(6) +++

(6) ну примерно до сюда я додумался, не могу сообразить как. подскажите?

(8) обновить()

(8) ЭтаФорма.Прочитать();

(9) ЭтаФорма.Обновить () - ничего не изменилось
(10) ЭтаФорма.Прочитать () - ??? забыл сказать. Обычные формы

(10) может я чего то не догоняю....
Создаем новый док, заполняем контрагента (не красится), след.шагом ЭтаФорма.Прочитать ()
Она ж вроде опять вместо введенного контрагента пустую ссылку вставит (для несохраненного дока)

прочитать() не надо, это повторная загрузка из базы

так, мне было скучно.

в (0) код странный, так что добавь примерно следующее:

Процедура Реквизит1ПриИзменении(Элемент)
    Если Реквизит1 = 1 Тогда
        ЭлементыФормы.Реквизит1.ЦветФонаПоля = WebЦвета.Красный;
    Иначе
        ЭлементыФормы.Реквизит1.ЦветФонаПоля = Новый Цвет;
    КонецЕсли;
    
    Обновить();
КонецПроцедуры

а вообще, я бы сделал чуть иначе: хороший контрагент - рядом рисуем галочку зелёную, проблемный контрагент - красный крестик, не выбран - ничего не рисуем.
и понятна, и секса с кодом меньше

(15) Спасибо за наводку!

(14) Если Вы про условие - то там ф-я булево возвращает

Процедура ВыделитьКонтрагента(Контрагент)
    Если ЛояльныйКлиент(Контрагент) Тогда
        ЭлементыФормы.Контрагент.ЦветФона = WebЦвета.БледноЗеленый;
    Иначе
        ЭлементыФормы.Контрагент.ЦветФона = Новый Цвет;    
    КонецЕсли;
    Обновить ();
КонецПроцедуры

Процедура КонтрагентПриИзменении(Элемент) Экспорт
    ВыделитьКонтрагента(Контрагент);
КонецПроцедуры

На последней строке точка останова. в отладчике
ЭлементыФормы.Контрагент.ЦветФона = зеленый
на форме .... обычный цвет фона

Процедура ВыделитьКонтрагента(Контрагент)
    Если ЛояльныйКлиент(Контрагент) Тогда
        ЭлементыФормы.Контрагент.ЦветФона = WebЦвета.БледноЗеленый;
        ЭлементыФормы.тКонтрагент.ЦветТекста = WebЦвета.БледноЗеленый;
    Иначе
        ЭлементыФормы.Контрагент.ЦветФона = Новый Цвет;    
        ЭлементыФормы.тКонтрагент.ЦветТекста = Новый Цвет;
    КонецЕсли;
    Обновить ();
КонецПроцедуры

надпись красится а поле нет
может поле как обновить надо?

тКонтрагент - надпись

я не буду переписывать твой код, просто обрати внимание на **ЦветФонаПоля**

А что, условное оформление не модно?

(22) толстый клиент

(20) бинго!
только вот теперь наоборот ))))
Одна и таже проц. вызывается в конце ПриОткрытии () и ПриИзменении ()
Результат разный
http://prntscr.com/iax368
изменение
http://prntscr.com/iax3o9
открытие

ну меняй и цвет фона и цвет поля. а лучше иконку рядом вешай

(25) Спасибо. всё получилось

ИМХО с иконкой поприятнее было бы, но кого кроме меня и Вас это интересует ))))