Столкнулся с проблемой. Надо в таблице документа ячейку или колонку закрасить каким нибудь цветом. Это реально?

да

Как?!)

formex

Спасибо! Будем изучать))

Ну вот написал подключил но нет никакой реакции даже ошибок не выскакивает.


Процедура ПриОткрытии()
Путь = "C:\\FormEx.dll";
    Если ЗагрузитьВнешнююКомпоненту(Путь) = 0 Тогда Сообщить("Неудачная попытка загрузить FormEx.dll");
        СтатусВозврата(0);
        Возврат;
    КонецЕсли;    
    
    Сервис = СоздатьОбъект("Сервис");
    Сервис.ВключитьРаскраскуТаблиц();
КонецПроцедуры


Функция ПолучитьЦвет(Красный = 0,Зеленый = 0,Синий = 0)
    // функция для формирования значения цвета из составляющих (RGB)

    Возврат Макс(0,Синий)*65536+Макс(0,Зеленый)*256+Макс(0,Красный);
КонецФункции




Функция ПроверитьВид()
    
       Если (Число(ТабНом)<>0) Тогда
    Возврат "BRUSH["+ПолучитьЦвет(100,255,100)+"]";//Зеленый
КонецЕсли;

Возврат "";
КонецФункции

А колонку в ТЧ добавил с вызовом функции?
Или план раскраски, например?

(6) а зачем? он же "формекс подключил". вот формекс и должен думать, какую колонку и как раскрашивать

Да у меня первая колонка которая нумерует она вызывает функцию ПроверитьВид()

Или мне надо дополнительную колонку сделать что бы она в себе хранила план раскраски?

(9) инструкцию читать нонче непопулярно?

Используй лучше план расскраски.
+ в ПриОткрытии грузи вк, только если она еще не загружена ранее, а не всегда.

План раскраски
План раскраски
Описание
Для ускорения и упрощения работы раскраски таблиц в компоненту с версии 2.0.5.85 введен функционал плана раскраски таблицы. Для его активизации необходимо вызвать метод ИспользоватьПланРаскраски() объекта Сервис с параметром 1 (соответсвенно, для отключения и перехода на старый принцип раскраски надо вызвать тот же метод, но с параметром 0). По умолчанию функционал плана раскраски отключен и работает старая методика раскраски.
Для реализации раскраски по новому функционалу плана раскраски, необходимо добавить в раскрашиваемую таблицу колонку с заголовком "FormEx_ПланРаскраски" (без кавычек, регистронезависимо). Колонка может располагаться в любом месте таблицы. Содержимое этой колонки задает план раскраски таблицы, основанный на тех же макросах, которые описаны в части "Раскраска таблиц". При этом макросы COUNT и INDENT не обрабатываются. В плане раскраски каждая ячейка текущей строки определяется круглыми скобками. В плане учитываются как видимые, так и невидимые колонки. Макросы раскраски надо помещать в места, соответсвующие смене раскраски. Несколько примеров помогу лучше понять этот принцип.
Пример плана раскраски
"()()()(BRUSH[255])()()(BRUSH[NONE)" - обозначает, что начиная с четвертой колонки (включительно) цвет фона ячеек устанавливается красным, а с седьмо раскраска фона отключается и все остальные колонки не раскрашиваются;
"(BRUSH_S[255])" - обозначается, что вся строка, когда она становится текущей, подсвечивается красным фоном.

Блин я уже на психах! Добавил в таблицу реквизит с названием FormEx_ПланРаскраски тип текст. Что дальше? Кучу вариантов перепробовал не получается.

(10) Дак эти инструкции на каждом углу валяются. Была бы прочитал и не парил бы вам мозг.

и кстати выскакивает такое сообщение: Поле агрегатного объекта не обнаружено (ИспользоватьПланРаскраски)

У тебя в (5) все есть. Добавляй в ТЧ реквизит типа текст. Заходишь в свойства этого реквизита, ставишь галочку "сделать невидимым", а на закладке "Дополнительно" в поле формула вызываешь свою функцию ПроверитьВид(). И да, важный ньюанс, этот текстовый реквизит должен быть "левее" всех колонок на ТЧ, т.е. быть самым первым слева направо в ТЧ.

Процедура ПриОткрытии()

    ...............
    ТабОбщихЦенников.НоваяКолонка("ПроверкаЦены"         ,"Строка",   ,  ,"FormEx_ПланРаскраски"); // колонка для раскраски
    ...............

Процедура ПослеОткрытия()        

    ФормаРасш = СоздатьОбъект("РасширениеФормы");
    ФормаРасш.РаскрашиватьТаблицу("ТабОбщихЦенников");
    ФормаРасш.РаскрашиватьТаблицу("ТабУменЦенников");
    ФормаРасш.РаскрашиватьТаблицу("ТабБумЦенников");
    
    мСервис = СоздатьОбъект("Сервис");
    мСервис.ВключитьРаскраскуТаблиц();
    
    оПривязки.ПослеОткрытия();

КонецПроцедуры // ПослеОткрытия

Функция РаскраситьЦены(гТабВыборка)        // красим - по условию

    Если (гТабВыборка.Цена < гТабВыборка.Себестоимость) или (ПустоеЗначение(гТабВыборка.Цена) = 1) Тогда
        Возврат "()()()()()()()()()()()()(BRUSH[" + ПолучитьЦвет(255, 255, 153) + "]COUNT[2]";
    КонецЕсли;

    Возврат "";
    
КонецФункции    // РаскраситьЦены

Процедура ЗаполнениеСтрокиТаблицы(гТабВыборка, СписокПараметров)

    гТабВыборка.НоваяСтрока();
    
    ........................
    гТабВыборка.ПроверкаЦены            = РаскраситьЦены(гТабВыборка); // обработка раскраски
    ........................    
    Форма.Обновить();

Скажите а кроме файла FormEx.dll может еще что то надо?

(17) Для раскраски - нет.

(14)версия формекса какая?

2.05.83

(15) для использования плана раскраски - положение колонки с планом раскраски никак не влияет

(20)"Для ускорения и упрощения работы раскраски таблиц в компоненту с версии 2.0.5.85 введен функционал плана раскраски таблицы"

(20) Качни 2.0.5.108

(20) И кстати, код показывай.

Я знаю. Поэтому у меня и каша на одном сайте такой код на другом такой. Кароче завтра опять нырну с головой в это дело потому что сегодня и так целый день промаялся уже видеть не хочу этот ФормЕкс. Всем спасибо!!

(24) Дак он же в посте - 5

(26) Попробуй в ПроверитьВид -     Возврат "(BRUSH_S[" + ПолучитьЦвет(255, 255, 153) + "])";

Заработало!!
Но теперь другой вопрос что бы раскрашивать методом "()(BRUSH[255])()" что надо сделать а то у меня все строку заливает. Хотя как я понимаю в этом случае должен 1 и 3 колонку не заливать.

Вот код

Процедура Раск()
FormEx = СоздатьОбъект("Сервис");
FormEx.ВключитьРаскраскуТаблиц();



ТаблОтг.НоваяКолонка("FormEx_ПланРаскраски",    "Строка");
ТаблОтг.НоваяКолонка("Док",    "Строка");
ТаблОтг.НоваяКолонка("Сум",    "Число", 15,2);  
ТаблОтг.НоваяКолонка("Сум1",    "Число", 15,2);
ТаблОтг.НоваяКолонка("Сум2",    "Число", 15,2);
ТаблОтг.НоваяКолонка("Сум3",    "Число", 15,2);
ТаблОтг.НоваяКолонка("Сум4",    "Число", 15,2);
ТаблОтг.НоваяКолонка("Сум5",    "Число", 15,2);

Для н = 1 По 3 Цикл
   ТаблОтг.НоваяСтрока();
   ТаблОтг.FormEx_ПланРаскраски = "()(BRUSH[255])()(BRUSH[255])";
   ТаблОтг.Сум = 123;
   ТаблОтг.Док = "11111";
   ТаблОтг.Сум1 = 123;
   ТаблОтг.Сум2 = 123;
   ТаблОтг.Сум3 = 123;
   ТаблОтг.Сум4 = 123;
   ТаблОтг.Сум5 = 123;
КонецЦикла;

КонецПроцедуры

вреде как мне надо написать после создания сервиса -  FormEx.ИспользоватьПланРаскраски(1); Но сразу начинает выскакивать сообщение "Поле агрегатного объекта не обнаружено (ИспользоватьПланРаскраски)"

(28) цитирую:
"Пример плана раскраски
"()()()(BRUSH[255])()()(BRUSH[NONE)" - обозначает, что начиная с четвертой колонки (включительно) цвет фона ячеек устанавливается красным, а с седьмо раскраска фона отключается и все остальные колонки не раскрашиваются;
"(BRUSH_S[255])" - обозначается, что вся строка, когда она становится текущей, подсвечивается красным фоном."

(29)"с версии 2.0.5.85 введен функционал плана раскраски таблицы"

(29) обнови формекс, для начала

(32) переводишь с русского на русский? :-)

Даааааа сам дошел! Тупица забылся новый подсунуть. Все ошибка ушла. Теперь не раскрашивает вообще ничего.

"Все ошибка ушла. Теперь не раскрашивает вообще ничего"
пять баллов....

(35) Самому смешно!)

(36) для тебя русский  язык - родной?

(37) Да а что?

(38)цитирую из (11):
"необходимо добавить в раскрашиваемую таблицу колонку с заголовком "FormEx_ПланРаскраски" (без кавычек, регистронезависимо)"
вроде, написано по-русски...

(39) У меня в коде
ТаблОтг.НоваяКолонка("FormEx_ПланРаскраски",    "Строка");

(40) колонку с ЗАГОЛОВКОМ "FormEx_ПланРаскраски"

http://gfile.ru/a7SuY

Но лучше, использовать выборочную расскраску таблиц - так меньше тормозов, т.е красить именно то, что нужно.

Все работает действительно надо было указать именно заголовок.  Мне почему то казалось что в НоваяКолонка. первое заголовок.

Выкладываю свой код может кому и пригодится в разборе приблуды FormEx.

Процедура ПриОткрытии()
Путь = "C:\\FormEx.dll";
    Если ЗагрузитьВнешнююКомпоненту(Путь) = 0 Тогда Сообщить("Неудачная попытка загрузить FormEx.dll");
        СтатусВозврата(0);
        Возврат;
    КонецЕсли;    
  
КонецПроцедуры

Процедура Раск()
FormEx = СоздатьОбъект("Сервис");
FormEx.ИспользоватьПланРаскраски(1);
FormEx.ВключитьРаскраскуТаблиц(0);



ТаблОтг.НоваяКолонка("Цвет","Строка",,,"FormEx_ПланРаскраски");
ТаблОтг.НоваяКолонка("Док",    "Строка");
ТаблОтг.НоваяКолонка("Сум",    "Число", 15,2);  
ТаблОтг.НоваяКолонка("Сум1",    "Число", 15,2);
ТаблОтг.НоваяКолонка("Сум2",    "Число", 15,2);
ТаблОтг.НоваяКолонка("Сум3",    "Число", 15,2);
ТаблОтг.НоваяКолонка("Сум4",    "Число", 15,2);
ТаблОтг.НоваяКолонка("Сум5",    "Число", 15,2);

Для н = 1 По 3 Цикл
   ТаблОтг.НоваяСтрока();
   ТаблОтг.Цвет = "(BRUSH[255])()(BRUSH[100])(BRUSH[NONE])(BRUSH[NONE])(BRUSH[NONE])(BRUSH[NONE])(BRUSH[NONE])";
   ТаблОтг.Сум = 123;
   ТаблОтг.Док = "11111";
   ТаблОтг.Сум1 = 123;
   ТаблОтг.Сум2 = 123;
   ТаблОтг.Сум3 = 123;
   ТаблОтг.Сум4 = 123;
   ТаблОтг.Сум5 = 123;
КонецЦикла;

КонецПроцедуры

http://gfile.ru/a7rq7

так даже лучшее, для подсветки текущей ячейки, и текущей строки.. + задание цвета в 16-ом формате.. для понимания.

(44) формекс - это не приблуда, если что

(42) Эх Епрст вот это бы вчера. Сэкономило бы кучу времени. Но все равно спасибо!

(46) Сейчас я просто злой что столько времени убил. А так да весч!

(47) Кстати, вот так - ()()()()()()()()()()()()(BRUSH[" + ПолучитьЦвет(255, 255, 153) + "]COUNT[2] - раскрашивает 2 предпоследние колонки.

(48) Учись, студент (С) :)

(47) он вчера процитировал доку, в которой все написано.