К списку форумов К списку вопросов
Возможно ли в 1С 7.7 выводить на печать граф. файлы ?
domik
20.09.2004 - 11:35
Требуется такая вещь - сертификаты к товару. Привязал сканированную картинку к справочнику, а вот теперь надо из накладной их вывести на печать вместе с самой накладной. А как ( и вообше возможно ?) в 1С вставить в печатную форму требуемый граф. файл ?
101
1 - 20.09.2004 - 11:39
(0) да ...
ЗЫ можно вообще их открывать в графическом виде
ЗЫЫ в правила отправить?
Gloom
2 - 20.09.2004 - 11:41
Никита Зайцев (WildHare) где-то в 1999
--------------------------------------------------------------------------------
Задача крайне проста — в нашем распоряжении имеется энное количество изображений (растровых или векторных, не суть важно), и мы хотим “на лету” вставить в табличный документ одно из этих изображений. Само собой, изображения хранятся в виде отдельных файлов соответствующих форматов, а имя нужного файла станет известно только в самый последний момент.
Что делать?
Можно потратить некоторое количество времени на борьбу со встроенным объектом “Картинка” и даже, чем черт не шутит, добиться какого-то положительного результата. Но можно и не добиться. Во всяком случае, я не добился.
Можно и по-другому. В глобальном модуле пишем функцию:
Функция Рисунок ( Куда,Откуда ) Экспорт
  Куда.Загрузить(Откуда);
КонецФункции
В шаблоне таблицы организуем “посадочное место” для картинки (это делается так: F10-Таблица-Вставить рисунок-Картинка-растянуть до нужного размера-Отмена). В свойствах полученного объекта прописываем вызов своей функции (предполагается, что Таб — это имя таблицы, а Путь — переменная процедуры печати):
Рисунок(Таб.ТекущийОбъект,Путь);
После всего этого в процедуре печати остается определить, какой графический файл нам нужен:
Путь="C:\My_NonXXX_Pix\025.jpg";
Таб.ВывестиСекцию("КартинаМаслом");
Готово дело, картинка печатается. Единственное, чего еще не хватает — программного управления размерами картинки, но тут уж ничего не поделать. Все-таки 1С — это бухгалтерский софт, а не Photoshop. ;-)
dma
3 - 20.09.2004 - 11:44
В командной строке запускаешь типа c:\patch_to_file\mspaint.exe p MyFile.
Если другая прога, то соотв. поменять и все такое. Работает на ура.
101
4 - 20.09.2004 - 11:45
3. можно mspaint.exe даже не указывать :))
domik
5 - 20.09.2004 - 11:52
через пайнты и прочее - так оно и делается, но не нравится, ибо криво получается, потому что в терминале сидим. Имеем полноценное окно у юзеров, а оно надо ?
2 Gloom - будем попробовать, спасибо.
dma
6 - 20.09.2004 - 12:01
Есть компонента ActiveBMP.Может поможет.

К списку вопросов на форуме 1C

>>