Text und Bild zusammen auf ein Blatt drucken

  • VB.NET

Es gibt 2 Antworten in diesem Thema. Der letzte Beitrag () ist von RodFromGermany.

    Text und Bild zusammen auf ein Blatt drucken

    Hallo Leute

    Ich habe ein Programm geschrieben bei dem man auch etwas ausdrucken kann. Text und Bild soll gedruckt werden. Das mit dem text kriege ich nicht hin.
    Wie kann ich das bild auf eine bestimmte größe verkleinern und das dan auf die rückseite des blattes drucken.
    den text drucke ich mit

    VB.NET-Quellcode

    1. e.Graphics.DrawString()


    Danke im Voraus

    Glubschi43

    Nur mal zum Verständnis:
    Du willst drucken.
    Du willst auf die Vorderseite des Blattes einen Text drucken.
    Du willst auf die Rückseite des Blattes ein Bild drucken.
    Nimm ein PrintDocument und einen Drucker, der beidseitig drucken kann, Einstellungen kannst Du in einem PrintDialog vornehmen:
    Spoiler anzeigen

    VB.NET-Quellcode

    1. Public Class Form1
    2. Private actPage As Integer
    3. Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    4. actPage = 0
    5. PrintDocument1.Print()
    6. End Sub
    8. Private Sub PrintDocument1_PrintPage(ByVal sender As System.Object, ByVal e As System.Drawing.Printing.PrintPageEventArgs) Handles PrintDocument1.PrintPage
    9. If actPage = 0 Then
    10. e.Graphics.DrawString("bla", New Font("Arial", 20), Brushes.Black, 20, 20)
    11. e.HasMorePages = True
    12. ElseIf actPage = 1 Then
    13. ' sieh Dir die Überladungen von DrawImage an!
    14. e.Graphics.DrawImage(New Bitmap(DEIN_PFAD), New Point(40, 40))
    15. End If
    16. actPage += 1
    17. End Sub
    18. End Class
    Falls Du diesen Code kopierst, achte auf die C&P-Bremse.
    Jede einzelne Zeile Deines Programms, die Du nicht explizit getestet hast, ist falsch :!:
    Ein guter .NET-Snippetkonverter (der ist verfügbar).
    Programmierfragen über PN / Konversation werden ignoriert!

Facebook
Telefonspende