Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
22 ноя 2024, 17:23

Изменение цвета статуса заказа

Автор malcevm, 28 янв 2015, 11:35

0 Пользователей и 1 гость просматривают эту тему.

malcevm

Цитата: LexaK от 28 янв 2015, 13:45
так я же написал в примере! Комментарии надо читать! это не просто зелененькие строчки для красоты

//"111","222" - замените на ваши статусы (Перечисление.СтатусЗаказа(?)...)


в вашем случае, должно быть примерно так.


    ...
  Если Оформление.ДанныеСтроки.СостояниеЗаказа = Перечисление.СостояниеЗаказа.Заказать Тогда
    ...


Спасибо вам большое! а если мне нужно покрасить только ячейку а не все строку

Kironten

Оформление.Ячейки.<ИмяЯчейки>.ЦветФона

malcevm

Цитата: Kironten от 28 янв 2015, 14:04
Оформление.Ячейки.<ИмяЯчейки>.ЦветФона

Я прошу прощения за свою не грамотность, но можно показать процедуру полностью

Kironten

Цитата: malcevm от 28 янв 2015, 14:22
Цитата: Kironten от 28 янв 2015, 14:04
Оформление.Ячейки.<ИмяЯчейки>.ЦветФона

Я прошу прощения за свою не грамотность, но можно показать процедуру полностью

В вашем случае, видимо так:
Процедура СписокПриПолученииДанных(Элемент, ОформленияСтрок)
   
    //Начало СостояниеЗаказа
    Для каждого Оформление Из ОформленияСтрок Цикл

        лкЦвет  = WebЦвета.Белый;       

        //"111","222" - замените на ваши статусы (Перечисление.СтатусЗаказа(?)...)
        Если Оформление.ДанныеСтроки.СостояниеЗаказа = Перечисления.СостоянияЗаказа.Заказать Тогда
            лкЦвет = WebЦвета.Зеленый;
        ИначеЕсли Оформление.ДанныеСтроки.СостояниеЗаказа = Перечисления.СостоянияЗаказа.Подтвержден Тогда
            лкЦвет = WebЦвета.Желтый;
        КонецЕсли;

        Оформление.Ячейки.<ИмяСтолбцаЯчейкиВКоторойВыХотитеИзменитьЦвет>.ЦветФона = лкЦвет;       
       
    КонецЦикла;
КонецПроцедуры

malcevm

//Начало СостояниеЗаказа
    Для каждого Оформление Из ОформленияСтрок Цикл

        лкЦвет  = WebЦвета.Белый;       

        Если Оформление.Ячейки.СостояниеЗаказа.ЦветФона = Перечисления.СостояниеЗаказа.Заказать Тогда
            лкЦвет = WebЦвета.Зеленый;
        ИначеЕсли Оформление.Ячейки.СостояниеЗаказа.ЦветФона = Перечисления.СостояниеЗаказа.Подтвержден Тогда
            лкЦвет = WebЦвета.Желтый;
        КонецЕсли;

        Оформление.Ячейки.СостояниеЗаказа.ЦветФона = лкЦвет;       
       
    КонецЦикла;

Ошибок не обнаружено и отладчик не ругается но не красит ячейки

Kironten

Цитата: malcevm от 28 янв 2015, 14:50
//Начало СостояниеЗаказа
    Для каждого Оформление Из ОформленияСтрок Цикл

        лкЦвет  = WebЦвета.Белый;       

        Если Оформление.Ячейки.СостояниеЗаказа.ЦветФона = Перечисления.СостояниеЗаказа.Заказать Тогда
            лкЦвет = WebЦвета.Зеленый;
        ИначеЕсли Оформление.Ячейки.СостояниеЗаказа.ЦветФона = Перечисления.СостояниеЗаказа.Подтвержден Тогда
            лкЦвет = WebЦвета.Желтый;
        КонецЕсли;

        Оформление.Ячейки.СостояниеЗаказа.ЦветФона = лкЦвет;       
       
    КонецЦикла;

Ошибок не обнаружено и отладчик не ругается но не красит ячейки

Лишнего нагромоздили:
В условиях не задавайте цвет фона:
не:
Если Оформление.Ячейки.СостояниеЗаказа.ЦветФона = Перечисления.СостояниеЗаказа.Заказать Тогда
а
Если Оформление.ДанныеСтроки.СостояниеЗаказа = Перечисления.СостояниеЗаказа.Заказать Тогда

malcevm

Все прошу прощения напортачил, все работает, огромное спасибо все принявшим участие в этой безумной дискуссии
Процедура СписокПриПолученииДанных(Элемент, ОформленияСтрок)

//Начало СостояниеЗаказа
    Для каждого Оформление Из ОформленияСтрок Цикл

        лкЦвет  = WebЦвета.Белый;       

        Если Оформление.ДанныеСтроки.СостояниеЗаказа = Перечисления.СостояниеЗаказа.Заказать Тогда
            лкЦвет = WebЦвета.Зеленый;
        ИначеЕсли Оформление.ДанныеСтроки.СостояниеЗаказа = Перечисления.СостояниеЗаказа.Подтвержден Тогда
            лкЦвет = WebЦвета.Желтый;
        КонецЕсли;

        Оформление.Ячейки.СостояниеЗаказа.ЦветФона = лкЦвет;       
       
    КонецЦикла;
КонецПроцедуры


Похожие темы (5)

Рейтинг@Mail.ru

Поиск