Цвет текста в текущей ячейке Табличного Документа #757947


#0 by volkVVV
Доброго времени суток. Знаю, что вопрос уже заезженый, но что то ни одним из загугленных методов не получается. Вообщем, при выводе детальных записей в ТабДок, нужно изменить цвет ячейки с условием, например если ТехСостояние = НеИсправен, тогда красить цвет текста ячейки в красный. Подскажите люди добрые.
#1 by ДенисЧ
УФ/ОФ?
#2 by Горогуля
ТабДокумент кроме гугленья что-то ещё пробовал?
#3 by UFO
Вот так я вчера делал: Где т табличный документ
#4 by UFO
7 и 8 номера колонок
#5 by volkVVV
вот я так и делал Если Результат.ТехСостояние = Перечисления.ТехническоеСостояние.НеИсправен Тогда только красит не те ячейки, у меня параметр находится в ячейке R9C9
#6 by UFO
Сначала выведи а потом окрашивай А иначе надо минусовать ряд - 1
#7 by UFO
А лучше все-таки сначала вывести, а потом окрашивать, потому как если не выведено, то окрашивать непонятно что
#8 by Горогуля
а я у области красил. прямо в первой строке на каждой итерации
#9 by UFO
ну может и так.. я с 8-й еще года нету занимаюсь, поэтому не все тонкости знаю
#10 by volkVVV
вот так сделал, все равно красит только первую ячейку в колонке
#11 by UFO
так может у тебя условие только на первую строку срабатывает?
#12 by volkVVV
да нет, на него наоборот и не срабатывает, но все равно красит
#13 by UFO
Код полностью в студию!
#14 by UFO
ТабДок.ВысотаТаблицы содрежит в себе полную высоту таблицы после ТабДок.Вывести
#15 by volkVVV
#16 by UFO
А ты можешь сделать так, чтобы условие окрашивания вынести после ТабДок.Вывести;
#17 by Горогуля
ТабДокумент.Вывести(ОбалстьСтрока) не?
#18 by volkVVV
сейчас попробую
#19 by UFO
Будь ласка, попробуй
#20 by Горогуля
а делать две похожие области с разным цветом считаю извращением
#21 by Fedor-1971
ты ещё ничего не вывел в результирующий документ, но пытаешься оное покрасить, так что: либо ТабДок.Вывести(Строка); перед Если Результат.ТехСостояние = Перечисления.ТехническоеСостояние.НеИсправен Тогда либо вместо ТабДок.Область(ТабДок.ВысотаТаблицы,9,ТабДок.ВысотаТаблицы,9).ЦветФона - Строка.Область(ТабДок.ВысотаТаблицы,9,ТабДок.ВысотаТаблицы,9).ЦветФона
#22 by volkVVV
..... ТабДок.Вывести(Строка); Если Результат.ТехСостояние = Перечисления.ТехническоеСостояние.НеИсправен Тогда                                  ТабДок.Область(ТабДок.ВысотаТаблицы,9,ТабДок.ВысотаТаблицы,9).ЦветТекста = Новый Цвет(255,0,0);
#23 by НЕА123
ежели делать по честному, то
#24 by volkVVV
вот так вот работает
#25 by UFO
ну вот и юзай
#26 by Горогуля
Строка.Область(ТабДок.ВысотаТаблицы там не будет столько строк
#27 by Fedor-1971
ошибся, вот так надо Строка.Область(Строка.ВысотаТаблицы,9,Строка.ВысотаТаблицы,9).ЦветФона
#28 by Горогуля
а, не, найдётся. занятная хрень получится
#29 by volkVVV
всем спасибо, способ тоже интересен, попробую, результат позже отпишу
#30 by Горогуля
тоже интересен ему... да, жизнь без геморроя ярка и приятна
#31 by volkVVV
согласен, поэтому его тоже разъюзаю)
Тэги: 1С 8
Ответить:
Комментарии доступны только авторизированным пользователям

В этой группе 1С