Das Bild muß aber kleiner als die aktive Druckerauflösung sein.
Entweder muß das Bild verkleinert werden, oder die Druckerauflösung muß geändert werden.
Delphi-Quellcode:
{Ecke - links oben}
Printer.Canvas.Draw(0, 0, aGraphic);
{Zentriert}
Printer.Canvas.Draw((Printer.PageWidth - aGraphic.Width) div 2, (Printer.PageHeight - aGraphic.Height) div 2, aGraphic);
{Ecke - rechts unten}
Printer.Canvas.Draw(Printer.PageWidth - aGraphic.Width, Printer.PageHeight - aGraphic.Height, aGraphic);
In meine alten Demo (
Bilder verkleinern ???) findest du viele Daten zum Drucker. Das Programm starten, den gewünschten Drucker anklicken und schon siehst du die dem Drucker entsprehenden Daten.