Forum: Sonstige Fragen zu Delphi
Delphi
by ak1,
18. Aug 2004
Jupp habe das Bild jetzt proportional gestrecht:
Printer.BeginDoc;
With Printer.Canvas Do
Begin
SetMapMode(Printer.Canvas.Handle, MM_LOMETRIC); // Printermode auf 1/10 mm
Rect(0, 0, druckbildbreite, -1* druckbildhoehe);
StretchDraw(Printer.Canvas.ClipRect, bmpMyPrinter);
Forum: Sonstige Fragen zu Delphi
Delphi
by ak1,
17. Aug 2004
Hallo Leute,
ich habe ein relativ großes Bitmap welches ich auf einem Drucker ausplotten (drucken) möchte. Die Größe des Bitmaps ist variabel. Ich habe nun das Bitmap auf die vom User eingestellete Blattgröße gestretcht indem ich diese Routine verwende:
Printer.BeginDoc;
With Printer.Canvas Do
Begin
StretchDraw(Printer.Canvas.ClipRect, bmpMyPrinter);
Verti :=...