Вывод Картинки На Форму

[Olgir]

Ситуация такая - в базе хранится картинка в виде ХранилищеЗначения. Мне нужно вывести ее на форму.

Как картинка попала в базу:

&НаКлиенте
Процедура ЗаписатьДанные()
МояКартинка = Новый Картинка(ПутьКФайлу);
ЗаписатьНаСервере(МояКартинка, Объект.Наименование);
КонецПроцедуры

&НаСервере
Процедура ЗаписатьНаСервере(МояКартинка, Наименование)
ХранилищеКартинки = Новый ХранилищеЗначения(МояКартинка);
НоваяКартинка = Справочники.Картинки.СоздатьЭлемент();
НоваяКартинка.Наименование = Наименование;
НоваяКартинка.Картинка = ХранилищеКартинки;
НоваяКартинка.Записать();
КонецПроцедуры;

Как я ее оттуда забираю:

&НаКлиенте
Процедура ШапкаОбработкаВыбора(Элемент, ВыбранноеЗначение, СтандартнаяОбработка);
ШапкаКартинка = ВыбранноеЗначение.Картинка.Получить();
КонецПроцедуры

Где выбранное значение - элемент справочника с картинками, ВыбранноеЗначение.Картинка - реквизит типа ХранилищеЗначения, а ШапкаКартинка - элемнет формы типа Картинка.

После вышеуказанной процедуры ничего не происходит, поле ШапкаКартинка остается пустым. Пробовал делать так:

ИмяФайла = "C:\test.jpg";
ХранилищеКартинки = ВыбранноеЗначение.Картинка.Получить();
ХранилищеКартинки.Записать(ИмяФайла);

Картинка из базы при этом корректно записывается в test.jpg.

Если ставлю на элементе ШапкаКартинка галочку "Гиперссылка", при нажатии на него появляется нужная картинка в новом окне, но на форме в поле по прежнему пусто.

Что я делаю не так? Тапками не бросать - я новичек . Поясните, пожалуйста, как правильно работать с картинками в базе?

Ах да, это управляемая форма.

 

[Olgir]

Отбой, проблему уже решил!

 

[Dzo]

Прошу помощи. Похожая проблема. Торговля и Склад 7.7
Пытаюсь в стандартую обработку ПечатьПрайса добавить изображение.

врКод=ТекЭлем.Код;
врФайлКартинки=КаталогИБ()+"Изображения\"+ВрКод+".jpg";
Картина=СоздатьОбъект("Картинка");
Если ФС.СуществуетФайл(врФайлКартинки)=1 Тогда
Картина.Загрузить(врФайлКартинки);
КонецЕсли;
ИсхТабл.ПрисоединитьСекцию("Номенклатура|Картинка");

В секцию "Номенклатура | Картинка" добавляю картинку, через Таблица-ВставитьРисунок-Текст. И присваиваю ей идентификатор Картина.

В таблице выходит следующее

Соображений нет, как быть дальше.
Заранее благодарен!

 

[Dzo]

Так и не решил проблему. Ап. Спасибо.

 

[evgenyatam]

выкини создатьОбъект.

 

[Dzo]

Перерыл весь инет, сделал по другому.

В таблицу вставил секцию Картинка, в нужную ячейку вставил "Таблица-Вставить Рисунок - Текст", в свойствах выбрал "выражение" прописал формулу Рисовать(ИсхТабл.ТекущийОбъект, Путькфайлу)

Создал функцию

Функция Рисовать(Куда, Откуда)
Куда.РежимРисования(3);
Куда.Загрузить(Откуда);
КонецФункции

В процедуре сформировать прописал путь к файлу

Путькфайлу=КаталогИБ()+"Изображения\00005317.jpg";

Специально прописал именно один файл, пусть хоть что-нибудь выведет.

И присаоединил секцию

ИсхТабл.ПрисоединитьСекцию("Номенклатура|Картинка");

Не работает. Где я свернул не туда?

 

[Дайнеко]

... вставил "Таблица-Вставить Рисунок - Текст",

Вот и оно. Надо: "Таблица-Вставить Рисунок - Картинка". В ответ на выбор файла - эскейп.
А дальше все так.

 

[Dzo]

Вот и оно. Надо: "Таблица-Вставить Рисунок - Картинка". В ответ на выбор файла - эскейп.
А дальше все так.

Спасибо огромное, заработало!