• Paranoid - курс по анонимности и безопасности в сети от команды codeby. Защита персональных данных, анонимность в сети интернет, настройка виртуальных машин, безопасная передача данных, анти форензика и еще много всего полезного. Подробнее ...

печать сертификатов

  • Автор темы vladimir_n
  • Дата начала
Статус
Закрыто для дальнейших ответов.
V

vladimir_n

#1
Печатаем jpg картинки из документа 1С. Имена файлов с картинками хранятся в табличной части документа. При формировании печатной формы картинки загружаются поочередно (jpg файлы лежат на сервере). При выводе на печать отображает только картинки к 10 строкам документа, для остальных строк - белые листы.

в форме документа:
"Картинка.Загрузить(СокрЛП(ФайлОбраза2));"

В таблице вставлен объект "Картинка", в свойства объекта запуск функции "ОбразСертификата(СертТаб.ТекущийОбъект)", ФайлОбраза - строка с именем картинки

Процедура ОбразСертификата(Картинка)
// ФайлОбраза="C:\Картинки\проба.bmp";
Если СокрЛП(ФайлОбраза)<>"" Тогда
Если ФС.СуществуетФайл(СокрЛП(ФайлОбраза))=0 Тогда
Сообщить("На диске отсутствует образ сертификата "+СокрЛП(ФайлОбраза)+" !","!");
Возврат;
КонецЕсли;
Картинка.Загрузить(СокрЛП(ФайлОбраза));
Конецесли;
КонецПроцедуры
 
Статус
Закрыто для дальнейших ответов.