Jump to content
forum-okna.ru

AltAWin экспорт эскизов изделий


Recommended Posts

Приветствую, форумчане.

 

Интересует успешный опыт экспорта эскизов изделий из Альты.

 

Идея следующая: получить эскизы заказа (по модельно с размерами) на диске, кто сталкивался, как решали?

 

P.S. Извлечение из базы (таб. orderitems) картинки (поле THUMBS) не устраивает по качеству изображения.

 

Попытка через скрип процедурой "CreateModelImageFile" не увенчалась успехом (( ругается на кол параметров

Link to comment
Share on other sites

  • 10 months later...


Оконный портал tybet.ru | Подписка на новости | Бесплатные объявления | База оконных знаний | ОНЛАЙН-ВЫСТАВКА


  • 5 months later...

Я создал отчет с нужным мне рисунком в 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.

Link to comment
Share on other sites

Допустил неточность. Поле "THUMBS" содержит эскиз для предпросмотра.

 

Данные модели "сжаты" в поле PACKINFO.

Как вариант, можно использовать отчет.

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

 

Эскизы использую для "своего" варианта безбумажки. Но есть нюанс , отчет приходится запускать ручками, совместили с отчетом КП, при распечатке КП клиенту эскизы скидываются на диск.

Edited by TorAlex
Link to comment
Share on other sites

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.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...

Important Information

By using this site, you agree to our Terms of Use.