ImageEn, unit iemio

TImageEnMIO.PrintImage

TImageEnMIO.PrintImage


Declaration

procedure PrintImage(ImageIndex: integer; Margins : double = 1; VerticalPos : TIEVerticalPos = ievpCenter; HorizontalPos : TIEHorizontalPos = iehpCenter; Size : TIESize = iesFitToPage; SpecWidth : double = 0; SpecHeight : double = 0; GammaCorrection : double = 1; PrintAnnotations: boolean = False; const Heading: string = ''; HeadingHeight: Integer = 5; HeadingColor: TColor = clBlack); overload;
procedure PrintImage(ImageIndex: integer; PrtCanvas: TCanvas = nil; MarginLeft : double = 1; MarginTop : double = 1; MarginRight : double = 1; MarginBottom : double = 1; VerticalPos : TIEVerticalPos = ievpCenter; HorizontalPos : TIEHorizontalPos = iehpCenter; Size : TIESize = iesFitToPage; SpecWidth : double = 0; SpecHeight : double = 0; GammaCorrection : double = 1; PrintAnnotations: boolean = False; const Heading: string = ''; HeadingHeight: Integer = 5; HeadingColor: TColor = clBlack); overload;


Description

Print the specified image by specifying margins, vertical position, horizonal position and size.

Parameter Description
ImageIndex Index of the page/image to print (0 = first image). IEM_SELECTED_IMAGES can be specified for ImageIndex to print all images that the user has selected in the TImageEnMView or IEM_ALL_IMAGES to print all images in the TImageEnMView
PrtCanvas The printing canvas. Specify nil to use the Printer.Canvas
MarginLeft Left page margin in inches (Specify zero for no margin)
MarginTop Top page margin in inches (Specify zero for no margin)
MarginRight Right page margin in inches (Specify zero for no margin)
MarginBottom Bottom page margin in inches (Specify zero for no margin)
VerticalPos Vertical alignment of the image on the page, e.g. ievpCenter to center
HorizontalPos Horizontal alignment of the image on the page, e.g. iehpCenter to center
Size How the image should be sized for printing
SpecWidth The absolute width of the image in inches if Size = iesSpecifiedSize. The number of pages wide if Size = iesMultiplePages
SpecHeight The absolute height of the image in inches if Size = iesSpecifiedSize. The number of pages high if Size = iesMultiplePages
GammaCorrection Level of gamma correction, use 1 to disable gamma correction
PrintAnnotations If true and the image contains imaging or ImageEn annotations they will be printed
Heading Specifies the heading to print at the top of the page
HeadingHeight The height of the heading, as a PERCENTAGE of the overall page height, e.g. 5 will make the heading 5% of the page height
HeadingColor Specifies the color of the heading text

Note:
 You do not need to call Printer.BeginDoc/Printer.EndDoc unless you want to print a batch of images
 Use the OnPrintPage or OnPrintPage events to customize the heading added to each printed page
 When using iesSpecifiedSize, SpecWidth or SpecHeight will be adjusted to maintain the image's aspect ratio. Set PrintingMaintainAR to false to prevent this
 If you are printing a PDF, you should use Print


Example

// Print the first image in center of the page with original sizes
ImageEnMView1.MIO.PrintImage(0, 0, evpCenter, iehpCenter, iesNormal, 0, 0, 1);

// Print the selected image(s) stretched to the page center (respecting the proportions)
ImageEnMView1.MIO.PrintImage(IEM_SELECTED_IMAGES, 0, ievpCenter, iehpCenter, iesFitToPage, 0, 0, 1);

// Print all images stretched to the page center (respecting the proportions)
ImageEnMView1.MIO.PrintImage(IEM_ALL_IMAGES, 0, ievpCenter, iehpCenter, iesFitToPage, 0, 0, 1);

// Print the first five images as posters, four pages wide and six pages high
Printer.Title := 'ImageEn';
Printer.BeginDoc();
for i := 0 to 4 do
  ImageEnMView1.MIO.PrintImage( i, 0, ievpCenter, iehpCenter, iesMultiplePages, 4, 6, 1);
Printer.EndDoc();


See Also

 DoPrintPreviewDialog
 PrintImagePos
 OnPrintPage