probleme beim drucken

  • Allgemein

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

    probleme beim drucken

    hy
    ich will eine seite drucken.
    mein problem:
    wenn ich einen text drucke, der länger ist als die seite breit, dann wird er einfach abgeschnitten.
    ich müsste also automatisch einen absatz eifügen.
    ich kann aber auch nicht soundso viele zeichen abzählen, weil die schriftgröße änderbar ist im programm.

    mein code fürs drucken:

    VB.NET-Quellcode

    1. Private Sub DruckenToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DruckenToolStripMenuItem.Click
    2. Dim p As New Process ' Deklariert p als neuen Prozess
    3. speichern()
    4. If PrintDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
    5. PrintDocument1.PrinterSettings = PrintDialog1.PrinterSettings
    6. PrintDocument1.DocumentName = My.Settings.pfad3
    7. PrintDocument1.Print()
    8. MessageBox.Show("Blatt wird gedruckt.")
    9. End If
    10. End Sub
    11. Private Sub PrintDocument1_PrintPage(ByVal sender As System.Object, ByVal e As System.Drawing.Printing.PrintPageEventArgs) Handles PrintDocument1.PrintPage
    12. e.Graphics.DrawString(TextBox1.Text, My.Settings.Textattribute, Brushes.Black, 10, 10)
    13. End Sub
    :P Mfg Aligator :P