Помощь - Поиск - Пользователи - Календарь
Полная версия этой страницы: Вывести картинку
Украинский 1С форум: всё про 1С 8.3, 1С 8.2, 1С 8.1, 1С 8.0, 1С 7.7 > Программисту > Программирование в 1С Предприятие 8.2 > Программирование управляемых форм 1С 8.2
vbnm
1С ERP 2.0 , в справочнике добавил дополнительные сведения — файл (картинка).
Ни как не могу его вывести на печатную форму...
То несоответствие типа, то файл не найден, а если использую «Получить()» - не обнаружен метод.

Рис.Картинка = Новый Картинка(ВыборкаЗапрос.Значение.Ссылка.Получить());


Переделал:

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


Рис.Картинка =  Новый Картинка(ПС);


Теперь:"Каталог не обнаружен e1cib\tempstorage\....."

есть идеи?
Домовик
вряд ли помогу, потому-что восьмерку не знаю. Но недавно подобное было и выводит картинку.

&насервере
Процедура ВывестиТаблицу(Таблица,Макет,Картинка1)
Макет.рисунки.Картинка1.Картинка=Картинка1;
СекцияКартинки=Макет.ПолучитьОбласть("СекцияКартинки");    
Таблица.Вывести(СекцияКартинки);    

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



&НаКлиенте
Функция Команда1(Команда)
//ВывестиТаблицу(Таблица);
Таблица = Новый ТабличныйДокумент;
Макет=Отчет.РеквизитМакет;
Области=Макет.Области;
ОбластьКартинки=Области.СекцияКартинки;
Картинка1 = Новый Картинка(ПутьККартинке1);
ВывестиТаблицу(Таблица,Макет,Картинка1);
Таблица.Показать();

КонецФункции
vbnm
а так:
Рис.Картинка =  Новый Картинка("c:\Картинка.png");

работает, но это не вариант.
Vofka
А что тут ВыборкаЗапрос.Значение.Ссылка находится?

ПС. выделяйте код!
Домовик
тоже думаю. может там просто не тип Строка передается...
vbnm
Значение "ИмяФайла"
Тип "СправочникСсылка.Файлы"

Рис.Картинка = Новый Картинка(ВыборкаЗапрос.Значение.Ссылка.Наименование);


Значение "ИмяФайла"
Тип "Строка"

,а что там должно быть?
писал и так:
Рис.Картинка =  Новый Картинка(Строка("С:\" + ВыборкаЗапросПодписи.Значение.Наименование)+ "." +Строка(ВыборкаЗапросПодписи.Значение.ТекущаяВерсияРасширение));

, но нужно не с диска, а из базы.

когда
Рис.Картинка = Новый Картинка(ВыборкаЗапрос.Значение.Ссылка.Наименование);
пишет Файл ИмяФайла не найден!
Домовик
А вот так?
Рис.Картинка = Новый Картинка(Строка(ВыборкаЗапрос.Значение.Ссылка.Наименование));
vbnm
еще получается получить
Значение "e1cib/tempstorage/3f53c0c2-f839-40fe-968b-0d8d67978de2"
Тип "Строка"

если через временное хранилище


Цитата(Домовик @ 18.11.14, 14:56) необходимо зарегистрироваться для просмотра ссылки
А вот так?
Рис.Картинка = Новый Картинка(Строка(ВыборкаЗапрос.Значение.Ссылка.Наименование));



Ошибка при вызове конструктора (Картинка)
Рис.Картинка = Новый Картинка(Строка(ВыборкаЗапросПодписи.Значение.Ссылка.Наименование));
по причине:
Файл не обнаружен
Petre
Ну так ссылка на вх это не есть путь к файлу.
Сохранить во временный файл и прочитать в "картинке".
vbnm
Цитата(Petre @ 18.11.14, 15:02) необходимо зарегистрироваться для просмотра ссылки
Ну так ссылка на вх это не есть путь к файлу.
Сохранить во временный файл и прочитать в "картинке".

ПодскажиТЕ, как ссылку на ВХ сохранить как файл, я уже пробовал не получилось (((


 ! 

Правила, пункт 1
 
Vofka
Цитата(vbnm @ 18.11.14, 14:06) необходимо зарегистрироваться для просмотра ссылки
Подскажи, как ссылку на ВХ сохранить как файл, я уже пробовал не получилось (((

Скорее всего в справочнике Файлы присутствует какой-то реквизит с типом хранилище значения. Вот его надо получить (метод Получить()), в результате у вас получатся двоичные данные и на основании этих двоичных данных можно создать объект картинки.

vbnm, и я вам настоятельно рекомендую ознакомится с нашими правилами.
vbnm
ВыборкаЗапрос.Значение.ТекстХранилище.Получить()

возвращает пустую строку


ок
Vofka
Покажите структуру справочника Файлы.
Домовик
а в табло в отладчике

когда набираете ВыборкаЗапрос.Значение

что там открывается-разворачивается?
vbnm
Цитата(Домовик @ 18.11.14, 19:18) необходимо зарегистрироваться для просмотра ссылки
а в табло в отладчике

когда набираете ВыборкаЗапрос.Значение

что там открывается-разворачивается?



Значение "ИмяФайла"
Тип "СправочникСсылка.Файлы"
Домовик
і ніякого "плюсіка", щоб далі порозкривати?
vbnm
Цитата(Домовик @ 19.11.14, 9:56) необходимо зарегистрироваться для просмотра ссылки
і ніякого "плюсіка", щоб далі порозкривати?

есть "плюсик" там полно данных о файле
Домовик
у меня подозрение, что вы изображения уже держите в справочнике, уже загрузили, уже у вас есть что-то типа "картинка".


И, возможно, нужно Рис. Картинка= Выборка.Значение.... а далее искать в табло в "+" что там тип картинка и подставить.

восьмерки не знаю, может кто поправит.




vbnm
Всем сбасибо!
Решено собственными силами
Процедура ПолучитьКартинку(Пппп,ПСотрудника)
    Запрос = Новый Запрос;
    Запрос.Текст =
    "ВЫБРАТЬ
    |    ПрисоединенныеФайлы.ПрисоединенныйФайл,
    |    ПрисоединенныеФайлы.ХранимыйФайл,
    |    ПрисоединенныеФайлы.ПрисоединенныйФайл.Наименование
    |ИЗ
    |    РегистрСведений.ПрисоединенныеФайлы КАК ПрисоединенныеФайлы
    |ГДЕ
    |    ПрисоединенныеФайлы.ПрисоединенныйФайл.Наименование = &П";
        
        Запрос.УстановитьПараметр("П", Пппп.Значение.Наименование);
        Выборка = Запрос.Выполнить().Выбрать();
        
        Если Выборка.Следующий() Тогда
            ПСотрудника = Выборка.ХранимыйФайл.Получить();
        Иначе
            Сообщить("Файл <" + Строка(Пппп.Значение.Наименование) + "> не найден!",);
        КонецЕсли;

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


ПолучитьКартинку(Пппп,ПСотрудника);
    Рис.Картинка =  Новый Картинка(ПСотрудника);
vbnm
теперь не могу выгрузить картинки в отдельные файлы из другой базы

Выборка = Справочники.КартинкиСотрудников.Выбрать();
    Пока Выборка.Следующий() Цикл
        ИмяФайла = СтрЗаменить(СтрЗаменить(СтрЗаменить(СтрЗаменить(Строка(Выборка.Сотрудник)," ",""),".",""),"(",""),")","");
        ПодписьСотрудника = Выборка.Картинка.Получить();
        ЗначениеВФайл(Строка(ИмяПути)+Строка(ИмяФайла)+".png",ПодписьСотрудника);
    //    Выборка.Подпись.Записать(Строка(ИмяПути)+Строка(ИмяФайла)+".png");
        Сотрудник = ИмяФайла;
        Выборка.Сотрудник.Соханить();
    КонецЦикла;

файлы создаются, не пустые, но не открываются, в чем может быть проблема?
Vofka
vbnm, правила пункт 6. Тема закрывается.
Для просмотра полной версии этой страницы, пожалуйста, пройдите по ссылке.