Имя: Пароль:
1C
1C 7.7
v7: Закрасить область документа!
0 Aleksei_Pro
 
22.11.11
20:05
Подскажите, как правильно область закрасить цветом:
Если ДатаПлатежа <= ТекущаяДата() - 15 Тогда
Таб.ВывестиСекцию("ДатыОплаты").ЦветФона(16,777,215);
Иначе
Таб.ВывестиСекцию("ДатыОплаты");
КонецЕсли;
1 Анатоль
 
22.11.11
20:10
Для начала получить область, а потом только её разукрашивать
2 Aleksei_Pro
 
22.11.11
20:12
Я и так пробовал:
                   Таб.ПолучитьСекцию("ДатаОплаты").ЦветФона(16,777,215);;
   //                Таб.ВывестиСекцию("ДатыОплаты").ЦветФона(16,777,215);
   //                Таб.ВывестиСекцию("ДатыОплаты");
3 NS
 
22.11.11
20:19
а может...
Таб.ВывестиСекцию("ДатыОплаты");
Если ДатаПлатежа <= ТекущаяДата() - 15 Тогда
 таб.Область(Таб.ВысотаТаблицы(),1,Таб.ВысотаТаблицы(),10).ЦветФона(16,777,215);
4 Aleksei_Pro
 
22.11.11
20:28
Подскажите еще, почему этот запрос в ДБФ норм. работает а в скуле вылетает:?
   ДатаНач = Дата(11,01,01);
   ДатаКон = ТекущаяДата();
   ТекстЗапроса = "
   |Период с ДатаНач по ДатаКон;
   |Контрагент = Регистр.КредитыКонтрагентов.Контрагент;
   |Договор = Регистр.КредитыКонтрагентов.Договор;
   |Фирма = Регистр.КредитыКонтрагентов.Фирма;
   |СуммаКр = Регистр.КредитыКонтрагентов.СуммаКредита;
   |ДатаПлатежа = Регистр.КредитыКонтрагентов.ДатаПлатежаКредита;
   |КредДокумент = Регистр.КредитыКонтрагентов.ТекущийДокумент;
   |Функция СуммаНачОст = НачОст(СуммаКр);
   |Функция СуммаПриход = Приход(СуммаКр);
   |Функция СуммаРасход = Расход(СуммаКр);
   |Функция СуммаКонОст = КонОст(СуммаКр);
   |Группировка Контрагент Без Групп;
   |Группировка Договор БЕЗ Групп;
   |Группировка ДатаПлатежа;
   |"//}}ЗАПРОС
5 Aleksei_Pro
 
22.11.11
20:39
(4) ему походу даты не нравятся?
6 NS
 
22.11.11
20:40
Ему походу креддокумент не нравится.
7 Aleksei_Pro
 
22.11.11
20:45
а как поправить можно, в дбф нормально работает то
8 NS
 
22.11.11
20:47
Убрать эту строчку из запроса, ты ей ничего не получаешь.
9 Shandor777
 
22.11.11
21:30
(0) В (1) Анатоль же писал, что сначала нужно получить секцию, т.е. создать копию в переменной, а потом с ней работать.

Секц=Таб.ПолучитьСекцию("ДатыОплаты");
Если ДатаПлатежа <= ТекущаяДата() - 15 Тогда
    Секц.Область(1,1).ЦветФона(16,777,215);
КонецЕсли;
Таб.ВывестиСекцию(Секц);


Примерно так :)
Я не хочу быть самым богатым человеком на кладбище. Засыпать с чувством, что за день я сделал какую-нибудь потрясающую вещь — вот что меня интересует. Стив Джобс