Как получить картинку из файла, когда раньше было в хранилище 1С
Картинка = РаботаСФайлами.ХранилищеФайлаИзИнформационнойБазы(ТекущаяСтрока.ФотоДо);
Если Картинка <> Неопределено Тогда
КартинкаПечатьОрганизации = ОбластьМакета.Рисунки.Добавить(ТипРисункаТабличногоДокумента.Картинка);
КартинкаПечатьОрганизации.Картинка = Новый Картинка(Картинка.Получить(),Истина); //как теперь получить картинку не из хранилища а из файла
КартинкаПечатьОрганизации.Верх = 1;
КартинкаПечатьОрганизации.Высота = 70;
КартинкаПечатьОрганизации.Ширина = 70;
КартинкаПечатьОрганизации.Лево = 50;
КартинкаПечатьОрганизации.ГраницаСверху = Ложь;
КартинкаПечатьОрганизации.ГраницаСлева = Ложь;
КартинкаПечатьОрганизации.ГраницаСправа = Ложь;
КартинкаПечатьОрганизации.ГраницаСнизу = Ложь;
КартинкаПечатьОрганизации.РазмерКартинки = РазмерКартинки.Пропорционально;
Показатьтеперь изменили хранилище на файловое
ФайловыеПотоки.ОткрытьДляЧтения(ТекущаяСтрока.ФотоДо.Том.ПолныйПутьWindows+ТекущаяСтрока.ФотоДо.ПутьКФайлу)
тип данных файловый поток не работает
По теме из базы знаний
- Найти и уничтожить. Популярные уязвимости в проектах 1С
- Как не сгореть на обновлениях
- Запускаем 120 000 одновременных пользователей мобильного приложения на платформе 1С
- Начните уже использовать хранилище запросов
- 1С:Аналитика, инструмент BI в платформе 1С, опыт создания дашбордов и отчетов на примере 1С:ЗУП КОРП
Найденные решения
есть ли доступ по пути: ТекущаяСтрока.ФотоДо.Том.ПолныйПутьWindows+ТекущаяСтрока.ФотоДо.ПутьКФайлу?
Если есть, в двоичные данные можно его поместить, с ними работать. Например:
Работает на сильно переписанной УТ10 без БСП.
Если есть, в двоичные данные можно его поместить, с ними работать. Например:
мПуть = ПутьКаталога+ИмяФайла;
файл = Новый Файл(мПуть);
Если не файл.Существует() Тогда
Сообщить("Не найден файл: "+мПуть);
Возврат Неопределено;
КонецЕсли;
Возврат Новый ДвоичныеДанные(мПуть);
Работает на сильно переписанной УТ10 без БСП.
Остальные ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
есть ли доступ по пути: ТекущаяСтрока.ФотоДо.Том.ПолныйПутьWindows+ТекущаяСтрока.ФотоДо.ПутьКФайлу?
Если есть, в двоичные данные можно его поместить, с ними работать. Например:
Работает на сильно переписанной УТ10 без БСП.
Если есть, в двоичные данные можно его поместить, с ними работать. Например:
мПуть = ПутьКаталога+ИмяФайла;
файл = Новый Файл(мПуть);
Если не файл.Существует() Тогда
Сообщить("Не найден файл: "+мПуть);
Возврат Неопределено;
КонецЕсли;
Возврат Новый ДвоичныеДанные(мПуть);
Работает на сильно переписанной УТ10 без БСП.
Картинка = РаботаСФайлами.ХранилищеФайлаИзИнформационнойБазы(ТекущаяСтрока.ФотоСрыва);
Если Картинка = Неопределено Тогда
Картинка=Новый ДвоичныеДанные(ТекущаяСтрока.ФотоДо.Том.ПолныйПутьWindows+ТекущаяСтрока.ФотоДо.ПутьКФайлу);
КартинкаПечатьОрганизации = ОбластьМакета.Рисунки.Добавить(ТипРисункаТабличногоДокумента.Картинка);
КартинкаПечатьОрганизации.Картинка = Новый Картинка(Картинка,Истина);
Иначе
КартинкаПечатьОрганизации = ОбластьМакета.Рисунки.Добавить(ТипРисункаТабличногоДокумента.Картинка);
КартинкаПечатьОрганизации.Картинка = Новый Картинка(Картинка.Получить(),Истина);
КонецЕсли;
КартинкаПечатьОрганизации.Верх = 1;
КартинкаПечатьОрганизации.Высота = 70;
КартинкаПечатьОрганизации.Ширина = 70;
КартинкаПечатьОрганизации.Лево = 50;
КартинкаПечатьОрганизации.ГраницаСверху = Ложь;
КартинкаПечатьОрганизации.ГраницаСлева = Ложь;
КартинкаПечатьОрганизации.ГраницаСправа = Ложь;
КартинкаПечатьОрганизации.ГраницаСнизу = Ложь;
КартинкаПечатьОрганизации.РазмерКартинки = РазмерКартинки.Пропорционально;
ОбластьСрыва.Параметры.ДатаВремя = ТекущаяСтрока.ФотоСрыва.ДатаСоздания;
Показать
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот