Entweder du paßt das Bild an den Drucker an (
StretchDraw)
oder du paßt den Drucker an das Bild an.
Delphi-Quellcode:
SetMapMode(Printer.Canvas.Handle, Modus);
// Modus:
// MM_HIENGLISH 1 Pixel = 0.001 inch
// MM_LOENGLISH 1 Pixel = 0.01 inch
// MM_HIMETRIC 1 Pixel = 0.01 millimeter
// MM_LOMETRIC 1 Pixel = 0.1 millimeter
// MM_TEXT each logical unit(pixel) is mapped to one device pixel
// MM_TWIPS each logical unit is mapped to one twentieth of a printer's point (1/1440 inch, also called a "twip")