TorAlex Опубликовано: 27 августа, 2016 Share Опубликовано: 27 августа, 2016 Приветствую, форумчане. Интересует успешный опыт экспорта эскизов изделий из Альты. Идея следующая: получить эскизы заказа (по модельно с размерами) на диске, кто сталкивался, как решали? P.S. Извлечение из базы (таб. orderitems) картинки (поле THUMBS) не устраивает по качеству изображения. Попытка через скрип процедурой "CreateModelImageFile" не увенчалась успехом (( ругается на кол параметров Цитата Ссылка на комментарий Поделиться на других сайтах More sharing options...
TorAlex Опубликовано: 29 июня, 2017 Автор Share Опубликовано: 29 июня, 2017 UP Поле "THUMBS" содержит "сжатое/шифрованное" содержимое модели позиции. xml файл. По координатам "балок" можно построить эскиз. 52024-147817-1.txt Цитата Ссылка на комментарий Поделиться на других сайтах More sharing options...
Оконный Мастер Опубликовано: 5 декабря, 2017 Share Опубликовано: 5 декабря, 2017 Я создал отчет с нужным мне рисунком в altAwin 2.6.7.44 и выгружаю его скриптом так: uses 'sCreatePathToFilePicture'; var StringStream: TStringStream; FileStream: TFileStream; FilePath: string; JPGQuality,JPGResolution:Integer; procedure pEP_Model (modelid: integer; dicExport: IcmDictionary; PostFix:string); begin JPGQuality:=dicExport.Value['JPGQuality']; JPGResolution:=dicExport.Value['JPGResolution']; FilePath:=fCreatePathToFilePicture(modelid) + IntToStr(modelid) + '_' + PostFix + '.jpg'; StringStream := TStringStream.Create(QueryField('select REPORTBLOB from REPORTTEMPLATESLINK where REPORTNAME=''ExportPicturesToElement''')); try FileStream := TFileStream.Create(FilePath, fmCreate); try FastReportExportToJPG(CreateIcmStreamAdapter(StringStream), CreateIcmStreamAdapter(FileStream), dicExport, JPGQuality, JPGResolution); finally FileStream.Free; end; finally StringStream.Free; end; end; На вход процедуры нужно подать параметры, modelid, размеры рисунка и т.п. CreateModelImageFile плохо работает. Но если altAwin версии ниже 2.6.7.44, то вариантов немного, есть еще SaveThumbnailEx, SaveThumbnail. Цитата Ссылка на комментарий Поделиться на других сайтах More sharing options...
TorAlex Опубликовано: 13 декабря, 2017 Автор Share Опубликовано: 13 декабря, 2017 (изменено) Допустил неточность. Поле "THUMBS" содержит эскиз для предпросмотра. Данные модели "сжаты" в поле PACKINFO. Как вариант, можно использовать отчет. Сделал немножко по другому, эскизы по модельно с размерными линиями, выгружаются через отчет. Эскизы использую для "своего" варианта безбумажки. Но есть нюанс , отчет приходится запускать ручками, совместили с отчетом КП, при распечатке КП клиенту эскизы скидываются на диск. Изменено 13 декабря, 2017 пользователем TorAlex Цитата Ссылка на комментарий Поделиться на других сайтах More sharing options...
Рекомендованные сообщения
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.