Подскажите, пожалуйста, как оформить цветом определенную строку в дереве значений
21.10.2013
13:18
#1
"Здравствуйте!
Появилась проблемка. Необходимо выделить цветом строку в дереве значений по определенному условию. Дерево создаю программно.
Появилась проблемка. Необходимо выделить цветом строку в дереве значений по определенному условию. Дерево создаю программно.
Если НайденнаяСтрока.СвязанныйДокумент.ПометкаУдаления = Истина Тогда УО = УсловноеОформление.Представление.Добавить(); УО.Оформление.УстановитьЗначениеПараметра("ЦветФона",WebЦвета.Красный); КонецЕсли; " 22.10.2013
11:19
#5
"
Дерево = РеквизитФормыВЗначение("ДеревоСвязей");
Дерево.Строки.Очистить();
Запрос = Новый Запрос;
Запрос.Текст = "ВЫБРАТЬ РАЗРЕШЕННЫЕ
| СвязиДокументов.ТипСвязи КАК ТипСвязи,
| СвязиДокументов.ДатаУстановки,
| СвязиДокументов.СвязанныйДокумент,
| СвязиДокументов.СвязаннаяСтрока,
| СвязиДокументов.Комментарий,
| 1 КАК КоличествоДокументов
|ИЗ
| РегистрСведений.СвязиДокументов КАК СвязиДокументов
|ГДЕ
| СвязиДокументов.Документ = &Документ
|
|УПОРЯДОЧИТЬ ПО
| ТипСвязи"; Запрос.УстановитьПараметр("Документ", Объект.Ссылка);
Результат = Запрос.Выполнить().Выгрузить();
Результат.Сортировать("ТипСвязи");
ТабКоличествоСвязей = Результат.Скопировать();
ТабКоличествоСвязей.Свернуть("ТипСвязи", "КоличествоДокументов");
КоличествоСвязей = 0;
Для Каждого СтрокаТипСвязи Из ТабКоличествоСвязей Цикл
НоваяСтрока = Дерево.Строки.Добавить();
НоваяСтрока.ТипСвязи = СтрокаТипСвязи.ТипСвязи;
НоваяСтрока.ЭтоРодитель = Истина;
НоваяСтрока.Представление = Строка(СтрокаТипСвязи.ТипСвязи) + " (" + СтрокаТипСвязи.КоличествоДокументов + ")";
НайденныеСтроки = Результат.НайтиСтроки(Новый Структура("ТипСвязи", СтрокаТипСвязи.ТипСвязи));
Для Каждого НайденнаяСтрока Из НайденныеСтроки Цикл
СтрокаДок = НоваяСтрока.Строки.Добавить();
СтрокаДок.ТипСвязи = НайденнаяСтрока.ТипСвязи;
СтрокаДок.СвязанныйДокумент = НайденнаяСтрока.СвязанныйДокумент;
СтрокаДок.СвязаннаяСтрока = НайденнаяСтрока.СвязаннаяСтрока;
СтрокаДок.Комментарий = НайденнаяСтрока.Комментарий;
Если НайденнаяСтрока.СвязанныйДокумент.ПометкаУдаления = Истина Тогда
УО = УсловноеОформление.Представление.Добавить();
УО.Оформление.УстановитьЗначениеПараметра("ЦветФона",WebЦвета.Красный);
КонецЕсли;
КоличествоСвязей = КоличествоСвязей + 1;
КонецЦикла;
КонецЦикла;
ЗначениеВРеквизитФормы(Дерево, "ДеревоСвязей");
" 22.10.2013
11:38
#6
Так у Вас на форме уже создана таблица типа "ДеревоЗначений" с нужными колонками и только данные заполняете?
22.10.2013
11:45
#7
Дерево у меня формируется автоматически из кода представленного выше. Мне надо, чтобы при формировании дерева выделялись цветом строки, удовлетворяющие определенному условию.
Читают тему
(гостей: 3)