Hallo,
ich habe schon Google befragt, aber nicht die wirkliche Lösung gefunden..
Ich möchte den Inhalt (Textboxen, Text, evtl. Bilder usw.) die in einem Panel stehen drucken lassen im Querformat
jetzt habe ich hier im Forum nur den Code der für das komplette Form zuständig ist gefunden
Umschreiben klappt bei mir irgendwie nicht .. und wenn ich den Code so verwende, kann ich selbst wenn ich beim Drucker die Eigenschaften auf Querformat stelle das Form nicht im Querformat ausdrucken..
er schneidet es ab.
Wäre schön, wenn das mit dem Panel klappen würde und ich Hilfe von Euch bekommen könnte.. danke
ich habe schon Google befragt, aber nicht die wirkliche Lösung gefunden..
Ich möchte den Inhalt (Textboxen, Text, evtl. Bilder usw.) die in einem Panel stehen drucken lassen im Querformat
jetzt habe ich hier im Forum nur den Code der für das komplette Form zuständig ist gefunden
VB.NET-Quellcode
- Private Sub PrintDocument1_PrintPage(ByVal sender As System.Object, ByVal e As System.Drawing.Printing.PrintPageEventArgs) Handles PrintDocument1.PrintPage
- Dim bmp As New Bitmap(Me.Width, Me.Height)
- Me.DrawToBitmap(bmp, New Rectangle(0, 0, Me.Width, Me.Height))
- e.Graphics.DrawImage(bmp, 0, 0)
- End Sub
- Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
- If PrintDialog1.ShowDialog() = Windows.Forms.DialogResult.OK Then
- PrintDocument1.Print()
- End If
- End Sub
Umschreiben klappt bei mir irgendwie nicht .. und wenn ich den Code so verwende, kann ich selbst wenn ich beim Drucker die Eigenschaften auf Querformat stelle das Form nicht im Querformat ausdrucken..
er schneidet es ab.
Wäre schön, wenn das mit dem Panel klappen würde und ich Hilfe von Euch bekommen könnte.. danke