При запуске цвета строк нет. Вместо него в ячейках столбца прописалось BRUSH[12568013].
Что я делаю неправильно? Даю куски листинга. Спасибо!
Процедура ПриНачалеРаботыСистемы() Экспорт
// Подключение модуля цвета
Путь = КаталогИБ() + "FormEx.dll";
Если ЗагрузитьВнешнююКомпоненту(Путь) = 0 Тогда
Сообщить("Неудачная попытка загрузить FormEx.dll");
СтатусВозврата(0);
Возврат;
КонецЕсли;
Сервис = СоздатьОбъект("Сервис");
Сервис.ВключитьРаскраскуТаблиц();
// Функция цвета
Функция глПолучитьЦвет(Красный = 0, Зеленый = 0, Синий = 0) Экспорт
Возврат Макс(0,Синий)*65536 + Макс(0,Зеленый)*256 + Макс(0,Красный);
КонецФункции
// Установка режима трассировки (только в режиме отладки)
Функция глТрассировкаУстановить(Знач чУровень) Экспорт
Процедура Сформировать()
Апр = СоздатьОбъект("Документ.АктПриема");
Расх = СоздатьОбъект("Документ.РасходнаяНакладная");
ТЗ = СоздатьОбъект ("ТаблицаЗначений");
//Создание колонок
ТЗ.НоваяКолонка("ДатаПр");
ТЗ.НоваяКолонка("ЗАКАЗ");
ТЗ.НоваяКолонка("ПРОИЗВ");
...........................................
...........................................
ТЗ.НоваяКолонка("СУММА");
ТЗ.НоваяКолонка("Цвет");
//Акт приема выбор данных
Апр.ВыбратьДокументы(НачДата,КонДата);
Пока Апр.ПолучитьДокумент()=1 Цикл
ТЗ.НоваяСтрока();
ТЗ.ДатаПр = Апр.ДатаДок;
ТЗ.ЗАКАЗ = Апр.НомерЗаказа;
ТЗ.ПРОИЗВ = Апр.Производитель;
................................................
................................................
ТЗ.Адрес = Апр.Адрес;
ТЗ.Цвет = "BRUSH["+глПолучитьЦвет(205,197,191)+"]";
Расх.ВыбратьДокументы(НачДата,КонДата);
Пока Расх.ПолучитьДокумент()=1 Цикл
Если (Расх.НомерЗаказа = ТЗ.ЗАКАЗ) Тогда
ТЗ.ПРИЧИНА = Расх.Причина;
ТЗ.ИНЖЕНЕР = Расх.Инженер;
// ТЗ.СуммаР = Расх.Итого();
ТЗ.ВЫДАЛ = Расх.Выдал;
КонецЕсли;
КонецЦикла;
КонецЦикла;
ТЗ.ВыбратьСтроку();
Таб = СоздатьОбъект("Таблица");
Таб.ИсходнаяТаблица("БАЗА");
Таб.ВывестиСекцию("Шапка");
ТЗ.ВыбратьСтроки();
Пока ТЗ.ПолучитьСтроку()=1 Цикл
Таб.ВывестиСекцию("Строка");
КонецЦикла;
//Таб.ВывестиСекцию("Подвал");
Таб.ТолькоПросмотр(0);
Таб.Показать();
КонецПроцедуры