Здравствуйте нужна помощь.У меня есть справочник под названием Банковские карты. когда создаю справочник там есть перечесление Статус карты - "Активный" и "Пассивный" Нужно так сделать что бы когда при выборе активный в журналах именно эта ячейка стала зеленного цвета а когда пассивный стало красного цвета. Прошу помочь. 1С 8,1 обычная форма
---
```1c
    Процедура ПриПолученииДанных(Элемент, ОформленияСтрок)
    Для каждого ОформлениеСтроки Из ОформленияСтрок Цикл
    Если ОформлениеСтроки.ДанныеСтроки.СтатусКарты = Перечисления.СтатусКарты.Активная Тогда // для примера
    ОформлениеСтроки.ЦветФона = ... ; // нужный цвет
    ОформлениеСтроки.ЦветТекста = ... ; // нужный цвет
    ИначеЕсли ОформлениеСтроки.ДанныеСтроки.СтатусКарты = Перечисления.СтатусКарты.НеАктивная Тогда // для примера
    ОформлениеСтроки.ЦветФона = ... ; // нужный цвет
    ОформлениеСтроки.ЦветТекста = ... ; // нужный цвет
    КонецЕсли;
    КонецЦикла;
    КонецПроцедуры
```
---
"ОформлениеСтроки.ЦветФона" замените на "ОформлениеСтроки.Ячейки.<ИмяКолонки>.ЦветФона"
---
да не особо, в моём случае весь код был написан но использовать этот механизм не стали.
---
мать моя березка, а разве 8.1 еще живая?
---
```1c
    Процедура ПриПолученииДанных(Элемент, ОформленияСтрок)
    Для каждого ОформлениеСтроки Из ОформленияСтрок Цикл
    Если ОформлениеСтроки.ДанныеСтроки.СтатусКарты = Перечисления.СтатусКарты.Активная Тогда // для примера
    ОформлениеСтроки.ЦветФона = ... ; // нужный цвет
    ОформлениеСтроки.ЦветТекста = ... ; // нужный цвет
    ИначеЕсли ОформлениеСтроки.ДанныеСтроки.СтатусКарты = Перечисления.СтатусКарты.НеАктивная Тогда // для примера
    ОформлениеСтроки.ЦветФона = ... ; // нужный цвет
    ОформлениеСтроки.ЦветТекста = ... ; // нужный цвет
    КонецЕсли;
    КонецЦикла;
    КонецПроцедуры
```
---
Процедура ПриПолученииДанных(Элемент, ОформленияСтрок)
    Для каждого ОформлениеСтроки Из ОформленияСтрок Цикл
        Если ОформлениеСтроки.ДанныеСтроки.СтатусКарты = Перечисления.СтатусКарты.Активная Тогда // для примера
            ОформлениеСтроки.ЦветФона = ... ; // нужный цвет
            ОформлениеСтроки.ЦветТекста = ... ; // нужный цвет
        ИначеЕсли ОформлениеСтроки.ДанныеСтроки.СтатусКарты = Перечисления.СтатусКарты.НеАктивная Тогда // для примера
            ОформлениеСтроки.ЦветФона = ... ; // нужный цвет
            ОформлениеСтроки.ЦветТекста = ... ; // нужный цвет
        КонецЕсли;
    КонецЦикла;
КонецПроцедуры
Там же нет такая функция приПолучениеДанных (
---
Это не функция, это событие табличного поля, связанного со списком справочника.
---
нету же такого событии (
---
это событие. Вставляете код и привязываете процедуру в форме списка
---
Для каждого ОформлениеСтроки Из ОформленияСтрок Цикл
        Если ОформлениеСтроки.ДанныеСтроки.СтатусКарты = Перечисления.СтатусКарты.Активная Тогда // для примера
            ОформлениеСтроки.ЦветФона = ... ; // нужный цвет
            ОформлениеСтроки.ЦветТекста = ... ; // нужный цвет
        ИначеЕсли ОформлениеСтроки.ДанныеСтроки.СтатусКарты = Перечисления.СтатусКарты.НеАктивная Тогда // для примера
            ОформлениеСтроки.ЦветФона = ... ; // нужный цвет
            ОформлениеСтроки.ЦветТекста = ... ; // нужный цвет
        КонецЕсли;
    КонецЦикла;
у меня получилось но вся строка. а мне нужно конкретная ячейка (
---
ОформлениеСтроки.Ячейки.<ИмяКолонки>.ЦветФона
---
Процедура СправочникСписокПриПолученииДанных(Элемент, ОформленияСтрок)
 Для каждого ОформлениеСтроки Из ОформленияСтрок Цикл
        Если ОформлениеСтроки.ДанныеСтроки.АктивностьКарты = Перечисления.РабочаяИлиНеРабочаяКарта.Aktiv Тогда // для примера
            ОформлениеСтроки.ЦветФона = WebЦвета.Зеленый;
            ОформлениеСтроки.ЦветТекста =WebЦвета.Черный ;
  ИначеЕсли ОформлениеСтроки.ДанныеСтроки.АктивностьКарты = Перечисления.РабочаяИлиНеРабочаяКарта.VaxtıBitmiş Тогда // для примера
            ОформлениеСтроки.ЦветФона = WebЦвета.Красный;
   ОформлениеСтроки.ЦветТекста = WebЦвета.черный; // нужный цвет
        КонецЕсли;
    КонецЦикла;
КонецПроцедуры
Где сделать изминение ?
---
"ОформлениеСтроки.ЦветФона" замените на "ОформлениеСтроки.Ячейки.<ИмяКолонки>.ЦветФона"
---
ОформлениеСтроки.ЦветФона" замените на "ОформлениеСтроки.Ячейки..ЦветФона
Спасибо большое))) Извините за много вопросов )
---
не поможет?:
https://forum.mista.ru/topic.php?id=767152&page=1
https://helpf.pro/faq/view/786.html
https://forum.infostart.ru/forum9/topic160391/
---
Они не помогли мне(
---
какой точно релиз платформы и название и точный релиз конфигурации? Хочется знать, какие возможности там есть у вас )
---
Ладно я понимаю на 7.7 работают, но на 8.1! Мы и то на 8.2 одну контору перевели...
---
смысл гнаться за новой платформой если у тебя самописанная конфа? Работает и ладно.
---
И вам спасибо за код) Очень помог) Насчет гнаться, Гтовая конфигурация да, но я хочу его под себя сделать да и опыт в програмирование) Многое сам делал. Но есть вещи которых из книг невозможно узновать ))) Опять таки спасибо вам тоже )
---
удачи на тернистом пути программирования 1с ))
---
Спасибо большое) Хорошо что есть такие люди как вы, что помогают )
---
А можно еще один вопросик ? )) Я знаю надоел но просто чисто для интереса)
---
слушаю
---
У меня в этом же конфигурации не было фотки на номенклатуре. Изначально я попробовал поставить фото на другой справочник. которого создал. у меня все получилось я создал Резвизит под названием "Фото" и добавил код

```1c
    Процедура ДобавитьИзображениеНажатие(Элемент)
    Диалог = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.Открытие);
    Диалог.Заголовок = "Şəkili təyin edin";
    Диалог.ПредварительныйПросмотр = Истина;
    Если Диалог.Выбрать() Тогда

    Данные = Новый ДвоичныеДанные (Диалог.ПолноеИмяФайла);
    Фото = Новый ХранилищеЗначения (Данные, Новый СжатиеДанных(9));
    ИмяФайла = СтрЗаменить(Диалог.ПолноеИмяФайла, Диалог.Каталог, ");
    Картинка2 = Фото.Получить();

    НоваяКартинка = Новый Картинка(Картинка2);
    ЭлементыФормы.ОсновноеИзображение.Картинка = НоваяКартинка;

    Иначе
    Сообщить ("Şəkil seçilmədi");
    КонецЕсли;
    КонецПроцедуры

    Процедура ПриОткрытии()
    КартинкаИзХранилища = Фото.Получить();
    НоваяКартинка = Новый Картинка(КартинкаИзХранилища);
    ЭлементыФормы.ОсновноеИзображение.Картинка = НоваяКартинка;
    КонецПроцедуры
```

Теперь если поставить этот код на справочник номенклатура, по логике он будет работать. Но есть еще и другой способ когда фотки храняться в отдельной папки ПК. ТОгда какие изминение нужно сделать в коде? или в реквизитах ? вообще нужно ли ?
---
нужно хранить фото в базе или отдельном каталоге - вопрос не имеет однозначного ответа. Мы храним сканы докуменвтов и фото прямо в базе (через Хранилище). Путем подсчета выяснили что если если картинки поместим в отдельный каталог сильного уменьшения размера базы не происходит.
---
ото в базе или отдельном каталоге - вопрос не имеет однозначного ответа. Мы храним сканы докуменвтов и фото прямо в базе (через Хранилище). Путем подсчета выяснили что если если картинки поместим в отдельный каталог сильного уменьшения размера б
Всмысле не иммет значение даже если там 100000 видов товаров и все с картинками ? программа не будет глючить ?
---
глючить не будет. Будет расти размер базы и всё.
---
ючить не будет. Будет расти размер базы и всё.
А можно все таки попробовать сделать именно так что бы, через отдельную папку ? просто мне очень интересно знать и это) На будущее вдруг если смогу стать програмистом что бы понять смысл работы, как работает ?) Я знаю что там дел наверно много но вот убейте меня просто интересно очень )) Прям все хочетьсч и хочеться знать ))
---
конечно можно и чрез отдельную папку. Вместо хранилища используете каталог с файлами. Это вкратце :)
---
Всмысле поменять данные реквизита "Хранилище" на "Каталог с файлами" и изменить в коде ?
---
Ну я понимаю что вы програмист, и вам легко понять что говорит другой програмист вам но я то точно нимогу пока еще себя назвать програмистом , поэтому в кратце НеПойму ))))
---
Но как я понимаю нужно в коде просто сделать изминине и указать конкретную путь к конкретной папке )) но как и где указать вот это сложно чуток)
---
нужно где-то хранить путь до каталога, ведь база может быть на сервере, а хранилище ну другом сервере.. Ну и подумать над уникальным наименование сохранных файлов.
---
Много там работы да? (
---
да не особо, в моём случае весь код был написан но использовать этот механизм не стали.
---
Ну пожалуйсто помогите и мне попробовать сделать такое))
---
я же не против :)
---
можно я ваш телеграм или вотсап номер возьму?