Note: You must be registered in order to post a reply. To register, click here. Registration is FREE!
T O P I C R E V I E W
supersk
Posted - Mar 23 2017 : 04:44:02 I add some annotations in the image.Then I execute follow: ImageEnVect1->IO->DoPrintPreviewDialog(iedMaxi, Caption, false, "#25171;#21360;#39044;#35272;"); The result image has no any annotations But, when I execute: ImageEnVect1->IO->DoPrintPreviewDialog(iedMaxi, Caption, true, "#25171;#21360;#39044;#35272;"); The result image also has no any annotations, but it should has annotations. Why?
3 L A T E S T R E P L I E S (Newest First)
w2m
Posted - Mar 24 2017 : 14:13:14
procedure TForm1.Print1Click(Sender: TObject);
begin
// Save the image with vectorial objects
ImageEnVect1.Proc.SaveUndo;
// Merge vectorial objects with the background image
ImageEnVect1.CopyObjectsToBack(True);
// Do print preview
ImageEnVect1.IO.DoPrintPreviewDialog();
// Restore objects from the merge
ImageEnVect1.Proc.Undo;
end;
Posted - Mar 23 2017 : 21:57:49 The follow is my code: imgPrint->Assign(ImageEnVect1); imgPrint->CopyObjectsToBack(true, true); imgPrint->RemoveAllObjects(); imgPrint->IO->DoPrintPreviewDialog(iedtDialog, Caption, false, "UU");//, Caption, false, "#25171;#21360;#39044;#35272;"); When I run this program, it will show an error: Floating point division by zero My enviorment: Delphi XE 10.1 + Win10(64bit), my program is 64bit.
xequte
Posted - Mar 23 2017 : 04:50:18 Hi
The PrintAnnotations parameter is only for printing of "Wang Imaging Annotations" that are stored in the meta-data.
You should copy the objects to the back before calling the print code: