Вход | Регистрация
 
1С:Предприятие :: 1С:Предприятие 8 общая

Вывод картинок в отчёте.

Вывод картинок в отчёте.
Я
   MAPATNK2
 
09.09.21 - 16:36
УТ 10.3
Всем привет.
Добавил в макет отчета параметр "КартинкаПоз", заполняю его просто

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

Как сделать так, чтобы теперь в отчете отображалась сама картинка, а не слово "Картинка" как сейчас?
   PLUT
 
1 - 09.09.21 - 16:38
   MAPATNK2
 
2 - 09.09.21 - 17:40
(1) Спасибо, почитал, но не смог разобраться, как именно в нужной ячейке выводить картинку. Напротив Номенклатуры. Писал так

Попытка
    Секция = Макет.ПолучитьОбласть("СтрокаГруппировки|КолонкаИзоб");
    КартинкаТовара = Секция.Рисунки.Добавить(ТипРисункаТабличногоДокумента.Картинка);
    Если ТипЗнч(СтруктураЗначений) <> Тип("Структура") Тогда
        КартинкаТовара.Картинка = Выборка.Номенклатура.ОсновноеИзображение.Хранилище.Получить();                                                 
    Иначе
        КартинкаТовара.Картинка = СтруктураЗначений.Номенклатура.ОсновноеИзображение.Хранилище.Получить();                                             
    КонецЕсли;
        Секция.ТекущаяОбласть.ЦветФона = ТекущийЦвет;
        КартинкаТовара.Верх = 0;
        КартинкаТовара.Высота = 80;
        КартинкаТовара.Ширина = 80;
        КартинкаТовара.Лево = 50;
        КартинкаТовара.ГраницаСверху = Ложь;
        КартинкаТовара.ГраницаСлева = Ложь;
        КартинкаТовара.ГраницаСправа = Ложь;
        КартинкаТовара.ГраницаСнизу = Ложь;
        КартинкаТовара.РазмерКартинки = РазмерКартинки.АвтоРазмер;
    Исключение
        //Секция.Параметры.КартинкаПоз = "";

    КонецПопытки;
    
    ОбластьЯчеекТаблицы = Таб.Присоединить(Секция, РеальныйИндексТекущейГруппировки);

Но картинка появляется где то внизу отчета.
   MAPATNK2
 
3 - 09.09.21 - 17:44
Может что то не так написал. Вроде по аналогии делал....
   MAPATNK2
 
4 - 09.09.21 - 18:28
UP
   MAPATNK2
 
5 - 09.09.21 - 18:29
(2) Тут, кстати, если удалить следующий текст
 КартинкаТовара.Верх = 0;
        КартинкаТовара.Высота = 80;
        КартинкаТовара.Ширина = 80;
        КартинкаТовара.Лево = 50;
Картинка вообще пропадает
   MAPATNK2
 
6 - 09.09.21 - 19:07
В итоге сделал так.

        
    Секция1 = Макет.ПолучитьОбласть("СтрокаГруппировки|КолонкаИзоб");
    КартинкаТовара = Секция1.Рисунки.Добавить(ТипРисункаТабличногоДокумента.Картинка);

    Если ТипЗнч(СтруктураЗначений) <> Тип("Структура") Тогда
       КартинкаТовара.Картинка = Выборка.Номенклатура.ОсновноеИзображение.Хранилище.Получить();                                                 
    Иначе
       КартинкаТовара.Картинка = неопределено;                                             
    КонецЕсли;
    
        КартинкаТовара.Высота=35;
    КартинкаТовара.Ширина=45;
    КартинкаТовара.РазмерКартинки = РазмерКартинки.АвтоРазмер;    
        
    
    ОбластьЯчеекТаблицы = Таб.Присоединить(Секция1,);

Плюс в колонках и строках подобрал нужную ширину и высоту, чтобы картинки влазили.

Список тем форума
 
ВНИМАНИЕ! Если вы потеряли окно ввода сообщения, нажмите Ctrl-F5 или Ctrl-R или кнопку "Обновить" в браузере.