ImageEn, unit iemio

TImageEnMIO.PrintImages

TImageEnMIO.PrintImages


Declaration


procedure PrintImages(Columns: integer = 2; Rows: integer = 2; HorizSpace: double = 0.5; VertSpace: double = 0.5; PrintSelected: boolean = false; MarginLeft: double = 0; MarginTop: double = 0; MarginRight: double = 0; MarginBottom: double = 0; DrawBox: boolean = true; DrawText: boolean = true; DrawShadow: boolean = false; BoxColor: TColor = clBlack; const Heading: string = ''; HeadingHeight: Integer = 5; HeadingColor: TColor = clBlack);


Description


Print multiple images (all or just selected) in the attached TImageEnMView or TIEMultiBitmap as rows and columns of thumbnails (contact sheets).

Parameter Description
Columns Specifies the number of columns of images across the page.
Rows Specifies the number of rows of images down the page.
HorizSpace The horizontal space in inches between images.
VertSpace The vertical space in inches between images.
PrintSelected Set to true to print only selected images.
MarginLeft Page left margin in inches. By specifying all zero values, no margins are used.
MarginTop Page top margin in inches. By specifying all zero values, no margins are used.
MarginRight Page right margin in inches. By specifying all zero values, no margins are used.
MarginBottom Page bottom margin in inches. By specifying all zero values, no margins are used.
DrawBox Set to true to draw a box around the images (image space). The image is always stretched to maintain aspect ratio.
DrawText Set to true to draw text associated with every image.
DrawShadow Set to true to draw a shadow around the image.
BoxColor Specifies the color of the box around the image if DrawBox is True.
Heading Specifies the heading to print at the top of the page. If you append ### (e.g. 'Thumbnails###') it will append "Page x" to printed pages after the first one.
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.


Notes:
- Use the OnPrintPage or OnPrintPage event to customize the heading
- If the component is attached only to a TIEMultiBitmap then you should specify the font of Printer.Canvas before printing


Example


// Printing from a TImageEnMView
Printer.Title := 'ImageEn';
Printer.BeginDoc;
ImageEnMView1.MIO.PrintImages(6, 4);
Printer.EndDoc;

// Printing images in a TIEMBitmap
MIO := TImageEnIO.Create;
MIO.AttachedIEMBitmap := mbmp;
Printer.Title := 'ImageEn';
Printer.BeginDoc;
Printer.Canvas.Font.Name := 'Tahoma';
Printer.Canvas.Font.Size := 14;
MIO.PrintImages(6, 4);
Printer.EndDoc;
MIO.Free;


See Also


- DoPrintPreviewDialog
- PreviewPrintImages
- PrintImagesToBitmap
- PrintImagesToFile
- OnPrintPage