Drei Bilder auf eine Seite drucken

11/01/2010 - 09:47 von Susann Markward | Report spam
Hallo,

ich möchte drei Bilder, welche als drei verschiedene Dateien existieren,
auf ein einziges Blatt ausdrucken.

Also: Es existieren C:\image1.jpg, C:\image2.jpg, C:\image3.jpg.

Nun sollen alle drei Bilder auf ein einzelnes Blatt ausgedruckt werden.

Bisher habe ich immer alle Bilder nacheinander gedruckt. Welche
Papierverschwendung.

Bisheriger Code für ein Bild:

in Form-Load() ->

Set Pic = Me.Controls.Add("VB.PictureBox", "Pic")

in Print() ->

Pic.Picture = LoadPicture("C:\image1.jpg")
Printer.Print
Printer.PaintPicture Pic, 500, 500, Pic.Width * 1, _
Pic.Height * 1, 0, 0, Pic.Width, _
Pic.Height
Printer.EndDoc

MfG
Susann
 

Lesen sie die antworten

#1 Christian Zimmermann
11/01/2010 - 10:02 | Warnen spam
Hallo Susann,

ist noch eine Frage zu erwarten?

Gruß

Christian

Ähnliche fragen