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

Отобразить картинку на форме

Автор Ромашев Алексей, 26 мая 2016, 13:41

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

Ромашев Алексей

Добрый день. С самого утра не могу решить одну задачу... Имеется форма,управляемая, она вызывается когда пользователь кликает по товару в списке, на этой форме нужно отобразить картинку товара. Картинки лежат на сервере, у картинок имена соответствуют полю код в справочнике номенклатуры. Все примеры которые я находил связаны с сохранением картинок в отдельный справочник и т.д. Я хочу чтобы работало следующим образом: пользователь кликает по товару, в форму передаётся параметр(код товара), она открывается и при её открытии ищется файлы картинки. Не могу вывести картинку. Как это сделать? Путь к картинке всегда один и тот же, только имя меняется, вот так:

    ПолучитьКартинку("С:\\Картинки\"+КодТовара+".jpg")

Rasty

http://1c-uroki.ru/articles/pokaz_kartinok_v_spravochnike_1C_8.2

Загрузка и отображение картинки в 1С Предприятие 8.2. Подробный пошаговый пример + конфигурация.

Довольно часто возникает необходимость отображения различных картинок в справочниках или документах. Так, например, нам может понадобиться отображать фотографии нашей продукции в справочнике Товары или фото наших сотрудников в справочнике Сотрудники. Понятно, что такие фотографии лучше всего хранить непосредственно в нашей базе данных 1С. И сегодня мы разберемся, как же добавлять и хранить фотографии в базе данных 1С 8.2, а также как отображать данные фотографии в справочниках и документах.

Пример является универсальным и без труда может быть использован в любой конфигурации платформы 1С: Предприятие 8.2

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

2. Приступаем к реализации: решение данной задачи будет выполняться с использование платформы 1С:Предприятие 8.2. Скачать платформу 1С 8.2 можно тут.

3. Создайте новую конфигурацию и запустите систему в режиме конфигуратора. Более подробную информацию вы найдете в шагах с 1 по 9 данного пошагового примера.

4. Создайте новый справочник Файлы. Перейдите на закладку «Данные», длину кода и наименования оставьте без изменений. Создайте новый реквизит справочника «Файл»с типом значения ХранилищеЗначения.

Для хранения файлов, в том числе и Картинок в системе 1С Предприятие 8.2 используется особый тип значений - ХранилищеЗначения.

Зачем нам понадобился отдельный справочник Файлы? Ведь можно было создать справочник Сотрудники и в этом справочнике сделать дополнительный реквизит Файл с типом значения ХранилищеЗначения?
Фотографии могут быть довольно большого объема. А если еще у нас будет много сотрудников, то работать с таким справочником очень скоро станет некомфортно. Дело в том, что при открытии списка справочника, считываются все реквизиты (поля) его элементов, а значит, если мы будем хранить фото в его реквизитах, то будут считываться и все фотографии. Понятно, что при выборках и работе со списком справочника Сотрудники система будет «тормозить». Чтобы этого не было, мы создаем отдельный служебный справочник Файлы, а в справочнике Сотрудники будем в одном из реквизитов хранить лишь ссылку на определенный элемент справочника Файлы (ссылку на фото). В таком режиме работать со справочником Сотрудники будет комфортно.

5. Создайте новый справочник Сотрудники. Перейдите на закладку «Данные», длину кода и наименования оставьте без изменений. Создайте новый реквизит справочника Картинка с типом значения СправочникСсылка.Файлы.

6. Перейдите на закладку «Формы» нашего справочника Сотрудники. Для создания формы элемента справочника нажмите на кнопку Открыть.

На первом шаге выбираем тип формы: Форма элемента справочника. На втором шаге убираем галку с реквизита Картинка, так как данный реквизит (ссылку на фото) мы будем заполнять программно, а не интерактивно.

7. Перед нами открывается конструктор форм. Создайте новый реквизит формы Фото, тип - Строка, длина 0.

8. Мышкой перетащите созданный в шаге 7 реквизит Фото на Форму элемента справочника Сотрудники. В свойстве «Вид» получившегося поля меняем значение с «Поле ввода» на «Поле картинки».

Именно в этом поле (Фото) у нас на Форме и будет отображаться фотография, установленная данному сотруднику.

9. Для того, чтобы можно было загружать фотографии в базу данных 1С, создадим команду ДобавитьКартинку.

Перейдите на закладку «Команды» и создайте новую команду «ДобавитьКартинку». Далее нажмите на увеличительное стекло в свойстве «Действие» для перехода в программный модуль и создания шаблона процедуры ДобавитьКартинку(Команда).

10. Теперь в программном модуле нам необходимо описать действие нашей команды «ДобавитьКартинку». Пишем следующий программный код:

&НаКлиенте
Процедура ДобавитьКартинку(Команда)
ИмяФайла = "";
ПутьФайла = "";
//Вызываем Диалоговое окно и помещаем файл Картинки из локальной файловой системы во временное хранилище
Если ПоместитьФайл(ПутьФайла, , ИмяФайла, Истина) = Истина Тогда

//в строковый реквизит ФОТО нашей формы сохраняем ссылку на Картинку во временном хранилище
Фото = ПутьФайла;
//для создания нового элемента в Справочнике Файлы и записи Картинки в его реквизит Файл
//переходим на сервер с помощью вызова серверной процедуры

УстановитьКартинку();
КонецЕсли;
//условие ЕСЛИ нужно для того, чтобы если пользователь отказался от выбора файла
//мы не вызывали серверную процедуру УстановитьКартинку()

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

11. Действия по установке (загрузке) картинки и ее отображения на форме нашего справочника Сотрудника необходимо выполнять на стороне сервера. Это особенность работы системы с файлами. Именно для этого в тексте процедуры ДобавитьКартинку осуществляется вызов другой процедуры УстановитьКартинку(), которая будет выполняться на сервере.

В программном модуле, ниже процедуры ДобавитьКартинку(Команда) пишем следующий программный код:

&НаСервере
Процедура УстановитьКартинку()
//создаем новый элемент в Справочнике Файлы
НовыйФайлКартинки = Справочники.Файлы.СоздатьЭлемент();
//в реквизит СправочникаФайлы Файл помещаем выбранную ранее Картинку
НовыйФайлКартинки.Файл = Новый ХранилищеЗначения(ПолучитьИзВременногоХранилища(Фото));
Фото = ПоместитьВоВременноеХранилище(НовыйФайлКартинки.Файл.Получить());
//записываем новый элемент справочника Файлы
НовыйФайлКартинки.Записать();

//устанавливаем значение реквизита Картинка Справочника Сотрудники
Объект.Картинка = НовыйФайлКартинки.Ссылка;
КонецПроцедуры

12. Теперь нам остается добавить на Форму Кнопку и связать Кнопку с нашей командой «ДобавитьКартинку».

13. Как мы уже говорили в шаге 11, для отображения картинки на форме процедуру необходимо выполнять на сервере. Для этого выделяем Форму, в свойствах нашей Формы переходим на закладку «События» и переходим к событию ПриСозданииНаСервере.

14. Напишем программный код процедуры ПриСозданииНаСервере(Отказ, СтандартнаяОбработка):

&НаСервере
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
//отображение картинки при открытии формы справочника
Фото = ПолучитьНавигационнуюСсылку(Объект.Картинка, "Файл");

//устанавливаем автомасштаб для картинки
Элементы.Фото.РазмерКартинки = РазмерКартинки.АвтоРазмер;
КонецПроцедуры

15. Запускаем систему в режиме 1С:Предприятие и смотрим что у нас получилось:

На этом упрощенная реализация отображения картинок в справочника закончена. Вы можете скачать кофигурацию с данным примером по ссылке ниже:

Скачать конфигурацию "Хранение и отображение картинок в справочнике 1С"

О том, как можно улучшить нашу конфигурацию и какие дополнительные проверки можно добавить мы поговорим во второй части пошагового примера.

Пошаговый пример 1С 8.2: загрузка, хранение и отображение картинок (фотографий) в справочниках (2 часть)

Помогли - Скажи спасибо! Решил сам - поделись решением!
:)

Kironten

Цитата: Ромашев Алексей от 26 мая 2016, 13:41
Добрый день. С самого утра не могу решить одну задачу... Имеется форма,управляемая, она вызывается когда пользователь кликает по товару в списке, на этой форме нужно отобразить картинку товара. Картинки лежат на сервере, у картинок имена соответствуют полю код в справочнике номенклатуры. Все примеры которые я находил связаны с сохранением картинок в отдельный справочник и т.д. Я хочу чтобы работало следующим образом: пользователь кликает по товару, в форму передаётся параметр(код товара), она открывается и при её открытии ищется файлы картинки. Не могу вывести картинку. Как это сделать? Путь к картинке всегда один и тот же, только имя меняется, вот так:

    ПолучитьКартинку("С:\\Картинки\"+КодТовара+".jpg")

ЭлементыФормы.ПолеКартинки.Картинка = Новый Картинка("С:\\Картинки\"+КодТовара+".jpg");
Для обычных форм.
Для управляемых - постом выше.

Ромашев Алексей

Цитата: Rasty от 26 мая 2016, 13:55
http://1c-uroki.ru/articles/pokaz_kartinok_v_spravochnike_1C_8.2

Так там картинки хранят в справочнике отдельном. Можно без сохранения?
Добавлено: 26 мая 2016, 14:07


Цитата: Kironten от 26 мая 2016, 13:55
Цитата: Ромашев Алексей от 26 мая 2016, 13:41
Добрый день. С самого утра не могу решить одну задачу... Имеется форма,управляемая, она вызывается когда пользователь кликает по товару в списке, на этой форме нужно отобразить картинку товара. Картинки лежат на сервере, у картинок имена соответствуют полю код в справочнике номенклатуры. Все примеры которые я находил связаны с сохранением картинок в отдельный справочник и т.д. Я хочу чтобы работало следующим образом: пользователь кликает по товару, в форму передаётся параметр(код товара), она открывается и при её открытии ищется файлы картинки. Не могу вывести картинку. Как это сделать? Путь к картинке всегда один и тот же, только имя меняется, вот так:

    ПолучитьКартинку("С:\\Картинки\"+КодТовара+".jpg")

ЭлементыФормы.ПолеКартинки.Картинка = Новый Картинка("С:\\Картинки\"+КодТовара+".jpg");
Для обычных форм.
Для управляемых - постом выше.

Мне нужно без сохранения в справочник, чтобы напрямую из файла.

Kironten

Цитата: Ромашев Алексей от 26 мая 2016, 14:06
Мне нужно без сохранения в справочник, чтобы напрямую из файла.

Картинка = Новый Картинка("С:\\Картинки\"+КодТовара+".jpg");
АдресВоВременномХранилище = ПоместитьВоВременноеХранилище(Картинка, Новый УникальныйИдентификатор);
ЭтотОбъект.РеквизитКартинки = АдресВоВременномХранилище;

Ромашев Алексей

Цитата: Kironten от 26 мая 2016, 14:30
Цитата: Ромашев Алексей от 26 мая 2016, 14:06
Мне нужно без сохранения в справочник, чтобы напрямую из файла.

Картинка = Новый Картинка("С:\\Картинки\"+КодТовара+".jpg");
АдресВоВременномХранилище = ПоместитьВоВременноеХранилище(Картинка, Новый УникальныйИдентификатор);
ЭтотОбъект.РеквизитКартинки = АдресВоВременномХранилище;


Сейчас попробую, спасибо)

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

Рейтинг@Mail.ru

Поиск