Zitat von
Borschti:
Delphi-Quellcode:
Self.Canvas.StretchDraw(Rect(0, 0, 375, 518), Bitmap); // Self ist hier = Form1
Canvas.Draw((PageWidth - Bitmap.Width) div 2, (PageHeight - Bitmap.Height) div 2, Bitmap);
Du zeichnet das Bild immer noch nur auf die Form mittels StretchDraw, auf den Drucker weiterhin mit Draw ...