Привет. Подскажите рабочий пример программного раскрашивания ТЧ документа.

Задача вычленить из списка группы строк и каждой группе придать своё оформление. Ковыряюсь в поиске но как-то долго получается

(0) Приложение: управляемое или обычное?

при выводе строки, оформление строк

это в обычном приложении

(0) В гугле до ... много примеров.

В ПриПолученииДанных через оформлениеСтрок имеешь строки, и красишь

v8: раскраска строк табличной поле

в поиске он долго копается

(4) (2) Стаж: 8 лет 2 месяца 3 дня
Да он троллит или ждёт совсем готовое.

(6) клюшечник может

(7) Глянь на его темы. В клюшках есть СКД?

ПоказатьЦенуСтарую(мКолонкиТовары, ОформлениеСтроки.Ячейки);
    
КонецПроцедуры // ТоварыПриВыводеСтроки()


Процедура ПоказатьЦенуСтарую(КолонкиТабПоля, ЯчейкиСтрокиТабПоля)
                            
    ЯчейкиСтрокиТабПоля.ЦенаСтар.Выравнивание = ГоризонтальноеПоложение.Право;
    ТекЦена = ЯчейкиСтрокиТабПоля.Цена.Значение;
    Если ТекЦена > ЦенаСт Тогда
        ЯчейкиСтрокиТабПоля.ЦенаСтар.ЦветТекста = Новый Цвет(255,0,0);
    ИначеЕсли ТекЦена < ЦенаСт Тогда
        ЯчейкиСтрокиТабПоля.ЦенаСтар.ЦветТекста = Новый Цвет(0,0,255);
    КонецЕсли;
    ЯчейкиСтрокиТабПоля.ЦенаСтар.УстановитьТекст(ЦенаСт);
КонецПроцедуры

управляемое приложение, без при выводе строки

(10) но условным оформлением, да?

(6) я уже редко программирую и то для себя)

(11) "Использовать условное оформление не предлагать!"

(12) заставь рабов своих кодить тогда)

(11) ну да, только через условное оформление формы у меня не получится оформить, чуть сложнее надо каждую строку анализировать

(12) Ну тогда 500 рублей за выполнение твоей работы.

(14, 16) я не за платной помощью обратился, у кого может пример есть скинет, нет так нет.. чего срач разводить в каждой теме

(15) Если у тебя не получится, то может у других получится? Кстати, откуда уверенность, что не получится? Так какие там условия?

Поиск в гугле: Чередование групп с выделением цветом СКД

(15) Вот уже и выяснились некоторые подробности. Как насчет добавить еще одну колонку?

(18) та в общем-то всё просто

по одной из колонок серийный номер
пока цифры идут последовательно, цвет один, разрывается последовательность - другой

для удобства восприятия текста

ну может еще приоритеты задать, там если последовательных элементов более 10 - зеленый, менее - желтый, 1 шт всего - красный и т.п.

условным мне кажется такое сложно, поэтому программный начал смотреть

(22) Истина, как обычно, в конвергенции. Программно добавить колонку с количеством в группе, а условным - цвет.

(22) Как уже указывалось, что мешает вставить допколонку, заполнение которой возложить на твой код анализа и значение которой будет основой для условного оформления?

(23,24) ну да, думаю как вариант сработает, спасибо

хотелось конечно по ходу дела программно научиться это делать
условное оформление мне лично не так удобно потом просматривать и менять чем код

там делов то на 10 строк наверное, я просто пока не разобрался с кучей всяких скдшных настроект

в поиске в основном не управляемое приложение

(22) Расскажи и мне как сделаешь программное оформление в УФ, тоже интересно.

(26) Да еще и в СКД.

(26,27) отпишусь когда решу, ну а нет прийдется с колонкой служебной замутить

(28) "прийдется"
Откуда такая любовь к вставлению буквы "Й" во все, что ни попадя?

(29) в школе так учили, а еще бандеровец, может поэтому

(30) ТАК - это как? ТАК вставлять букву или ТАК плохо?

(29) вообще да это ошибка, не обращал внимания, спасибо

хоть какая-то польза из темы)

(30) а что, с середины 20-го века в Бендерах одни нелюди проживают, чтоль?

+ или потому что так сказали думать?

(9) любое цветовое оформление - в ПриВыводеСтроки.
Вы в ПоказатьЦенуСтарую что выводите?

короче ну его в пень наверное код писать, решение с доп. колонкой мне уже нравится

создам две колонки, Группа и Вес, заполню их по алгоритму и раскрашу через условное

всем спасибо

Вот рабочий пример, может кому пригодится

&НаСервере
Процедура ВключитьРаскраску(ПарамПартнер = null)
    
    Эл = ЭтаФорма.УсловноеОформление.Элементы;    
    Эл.Очистить();    
    НовЭл = Эл.Добавить();
    Отбор = НовЭл.Отбор.Элементы.Добавить(Тип("ЭлементОтбораКомпоновкиДанных"));
    Отбор.ВидСравнения = ВидСравненияКомпоновкиДанных.Равно;
    Отбор.ПравоеЗначение = Перечисления.СтатусИнтервалаРаботы.ОтмененКлиент;
    Отбор.ЛевоеЗначение = Новый ПолеКомпоновкиДанных("Объект.ОбращенияКлиентов.СостояниеЗаказа1");
    НовЭл.Оформление.УстановитьЗначениеПараметра("ЦветТекста", WebЦвета.Красный);
    НовЭл.Поля.Элементы.Добавить().Поле = Новый ПолеКомпоновкиДанных("ОбращенияКлиентовСостояниеЗаказа1");

КонецПроцедуры