Вставка картинки во внешнюю печатную форму Word

Форум Программирование Общие вопросы программирования (Dev)

1С:Управление нашей фирмой 1.6 Платформа 1С v8.3 Windows Россия 1С Внешняя обработка (ert,epf) Печатная форма (mxl) Отчеты и формы

1. BatTsyren 25.03.22 20:56 Сейчас в теме

Во внешнюю печатную форму на базе Word нужно вставить рисунок. Метод AddPicture требует хранения картинки на диске, чтобы существовал путь до нее. Но его нет, потому что картинка хранится в 1С, а именно где-то в Справочники.ПрисоединенныеФайлы. Был вариант как-то сохранить картинку в каталог временных файлов, но у меня не получается.
Сейчас вставляются только те картинки, которые я из 1С уже открыл, и они из-за этого сохранились на комп. Код выглядит примерно так:

Процедура СформироватьКоммерческоеПредложение(ПечатнаяФорма, МассивОбъектов, ОбъектыПечати, Ошибки)
...
Попытка
	Row.Cells(3).Range.InlineShapes.AddPicture(ПолучитьКартинку(ВыборкаТовары.Номенклатура),Ложь,Истина);
Исключение
КонецПопытки;
...
КонецПроцедуры

Функция ПолучитьКартинку(ВладелецФайла)

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

Показать

Прошу помочь, мучаюсь с этим уже вторую неделю. Список реквизитов у справочника выглядит так:

Прикрепленные файлы:

По теме из базы знаний

Подписаться на ответы Инфостарт бот

Свернуть все

Оставьте свое сообщение

E-mail: