Имя: Пароль:
1C
1С v8
Цвет строк
0 vanyshan
 
19.12.11
09:07
Всем доброе утро!
Подскажите пожалуйста, кто сталкивался с подобным: с помощью процедуры
ДокументСписокПриПолученииДанных() покрасил 2 документа, в обоих делается все по аналогии, но в результате есть отличие. В первом документе ячейки строк красятся не полностью красным цветом, а только по
контуру букв, остальное пространство остается белым, а вот во втором документе ячейки заливаются полностью цветом. В чем отличие так и не понял.Может кто то уже и встречался с похожим.
1 DrShad
 
19.12.11
09:08
ПриПолученииДанных вобще-то косвенно связано с фоном ячеек
2 golden-pack
 
19.12.11
09:10
(0) где код ? маляр - покрасил ...
3 vanyshan
 
19.12.11
09:23
Запрос = Новый Запрос;
   Запрос.Текст = "ВЫБРАТЬ
   |ПриходныйОрдерНаТовары.Ссылка,
   |ВЫБОР
   |    КОГДА ЕСТЬNULL(ПоступлениеТоваровУслуг.Ссылка, 0) = 0
   |        ТОГДА ЛОЖЬ
   |    ИНАЧЕ ИСТИНА
   |КОНЕЦ КАК Флаг
   |ИЗ
   |Документ.ПриходныйОрдерНаТовары КАК ПриходныйОрдерНаТовары
   |ЛЕВОЕ СОЕДИНЕНИЕ Документ.ПоступлениеТоваровУслуг КАК ПоступлениеТоваровУслуг
   |ПО (ПоступлениеТоваровУслуг.СкладОрдер = ПриходныйОрдерНаТовары.Ссылка)
   |ГДЕ
   |ПриходныйОрдерНаТовары.Ссылка В(&Масс)";
   Соотв = Новый Соответствие;
   Масс = Новый Массив;
   Для Каждого Строка Из ОформленияСтрок Цикл
       Масс.Добавить(Строка.ДанныеСтроки.Ссылка);
       Соотв.Вставить(Строка.ДанныеСтроки.Ссылка,Строка);
   КонецЦикла;
   Запрос.УстановитьПараметр("Масс",Масс);
   Выборка = Запрос.Выполнить().Выбрать();
   Пока Выборка.Следующий() Цикл
       Соотв.Получить(Выборка.Ссылка).ЦветТекста = ?(Выборка.Флаг,WebЦвета.Черный,WebЦвета.Красный);
   КонецЦикла;    
При таком раскладе красится только контур самих букв в ячейке
4 vanyshan
 
19.12.11
09:23
А вот здесь уже вся ячейка целиком заливается

СписокТТН=Новый СписокЗначений();
   
   Для каждого ОформлениеСтроки Из ОформленияСтрок Цикл
       СписокТТН.Добавить(ОформлениеСтроки.ДанныеСТроки.Ссылка);
   КонецЦикла;
   Запрос=НОвый Запрос("
   |  ВЫБРАТЬ РАЗЛИЧНЫЕ ТТН1.Ссылка
   |ИЗ Документ.ПоступлениеТоваровУслуг.Услуги КАК ПоступлениеТоваровУслугУслуги
   |    ВНУТРЕННЕЕ СОЕДИНЕНИЕ Документ.ТТН КАК ТТН1
   |ПО ПоступлениеТоваровУслугУслуги.ТТН = ТТН1.Ссылка
   |ГДЕ ТТН1.Ссылка В(&СписокТТН)
   |И (НЕ ПоступлениеТоваровУслугУслуги.Ссылка ЕСТЬ NULL )");
   
   Запрос.УстановитьПараметр("СписокТТН", СписокТТН);
   ТабВыделенных=Запрос.Выполнить().Выгрузить();
   Для КАждого ОформлениеСтроки Из ОформленияСтрок Цикл
       Если ТабВыделенных.НайтиСтроки(Новый Структура("Ссылка", ОформлениеСтроки.ДанныеСтроки.Ссылка)).Количество()>0 Тогда
           ОформлениеСтроки.ЦветФона = WebЦвета.Красный;
       КонецЕсли;
   КонецЦикла;
5 DrShad
 
19.12.11
09:26
а ничего что в одном ЦветТекста, а в другом ЦветФона?
6 cViper
 
19.12.11
09:27
Соотв.Получить(Выборка.Ссылка).ЦветТекста =
7 cViper
 
19.12.11
09:27
ОформлениеСтроки.ЦветФона
8 cViper
 
19.12.11
09:27
Почувствуй разницу
9 vanyshan
 
19.12.11
09:37
правда, не заметил, спасибо. Вопрос снят! Благодарю...
Проблемы невозможно решaть нa том же уровне компетентности, нa котором они возникaют. Альберт Эйнштейн