Drucken eines Formulars (kein Form) Din A4 Blatt

lris08 · 13. Dezember 2010, 18:35

Hallo Forum,

muß mich nun mit einem ganz neuen Thema beschäftigen...
Das Drucken...

Habe schon gegoogelt, vieles gefunden wie ich eine Form ausdrucken kann etc.

Wie mache ich es, dass ich ein Formular auf Basis einer Din A4 Seite drucken kann?

Ein Form erstellen, dass die Grösse eines Din A4 Blattes hat? ...habe ich da nicht die Probleme mit Auflösung etc.?

Vom Prinzip her, möchte ich eine Seite wie unter Word gestallten, Labels integrieren - diese dann eben per Knopfdruck füllen lassen und ausdrucken mit dem Printdialog (Drucker auswählen) etc.

Wie macht Ihr sowas ???

Gruß
Alex

SystemUnknow · 13. Dezember 2010, 22:42

msdn.microsoft.com/de-de/library/bb979343.aspx
msdn.microsoft.com/en-us/libra…tdocument%28vs.71%29.aspx

lris08 · 13. Dezember 2010, 22:46

...ok - habs kapiert...

Beispiel... Sagt mir bitte wenn ich falsch liege...

VB.NET-Quellcode

Private Sub PrintDocument1_PrintPage(ByVal sender As System.Object, ByVal e As System.Drawing.Printing.PrintPageEventArgs) Handles PrintDocument1.PrintPage
Dim g As Graphics = e.Graphics
' Schriftarten, Größen und Ausführung
Dim F01 As New Font("Helvetica", 11, FontStyle.Regular)
Dim F02 As New Font("Helvetica", 11, FontStyle.Bold)
' Schriftfarben
Dim C01 As Brush = Brushes.Black
' Ausgabe der Informationen und Inhalte ***************************************************************************************
g.DrawString("Dokumentenmappe", F02, C01, 10, 10)
End Sub

SystemUnknow · 14. Dezember 2010, 10:51

hier hast noch ein lösung ohne API: vbarchiv.net/tipps/tipp_1765-a…erinhalt-drucken-net.html

lris08 · 14. Dezember 2010, 17:35

Ich suche gerade ganz verzweifelt nach einer einfachen Lösung wie ich einen Zeilenumbruch bei g.Drawstring machen kann...

Google schon lang rum... einiges ausprobiert, bisher nix geklappt...

Derzeit noch...

VB.NET-Quellcode

Dim t = "Das ist mein super langer Text, der auf zwei Zeilen verteilt werden soll - ohne das es beim Drucken ätzend ausschaut!"
...
Dim FA11b As New Font("Arial", 11, FontStyle.Bold)
Dim C01 As Brush = Brushes.Black
...
g.DrawString(D_KategorieNr, FA10b, C01, 450, 300)

So stell ich es mir vor...

VB.NET-Quellcode

g.DrawString(D_KategorieNr, FA10b, C01, 450, 300) + Umbruch bei Zeichen 80, 450 (von lnks), 330 (von oben gesehen)

Könnt ma Ihr mal unter die Arme greiffen ?

Danke und Gruß
Alex

SystemUnknow · 14. Dezember 2010, 17:38

du muß dein text vorher umbrechen:

VB.NET-Quellcode

Dim t = "Das ist mein super langer Text, der auf zwei Zeilen verteilt" & vbcrlf & " werden soll - ohne das es beim Drucken ätzend ausschaut!"

lris08 · 14. Dezember 2010, 17:42

Das kann ich selbst aber nicht, weil das ein text ist der in einer DB gespeichert ist...
Das mit dem T = ... war nur als Beispiel...

Was in der DB steht ist von einem Wort bis hin zu 255 Zeichen...

SystemUnknow · 14. Dezember 2010, 17:43

das ist egal, in DB kannst du dein Text umbrechen wann du brauchst.

lris08 · 14. Dezember 2010, 17:47

du meinst der Anwender muß schon einen Textumbruch bei erfassen des Textes einfügen ?

Der Erfasser gibt in einer Textbox (die 255 Zeichen beinhalten kann) ein...

Bei der Druckausgabe ist diese Zeile aber keine 255 Zeichen lang, er soll sie nach 80 Zeichen umbrechen und in der nächsten weiter "Schreiben"...

SystemUnknow · 14. Dezember 2010, 17:49

du meinst der Anwender muß schon einen Textumbruch bei erfassen des Textes einfügen ?

währe nicht schlecht.. sparst du dir jede menge tipp arbeit.

lris08 · 14. Dezember 2010, 17:53

Das habe ich aber nicht - wer macht den schon in einer Textbox selbst einen Zeilenumbruch nach 80 Zeichen???

Sorry, aber ...

SystemUnknow · 14. Dezember 2010, 17:55

verstehe ich...............schau mal hier rein: msdn.microsoft.com/de-de/library/bb979081.aspx#ID0EIDAC

Drucken eines Formulars (kein Form) Din A4 Blatt

Drucken eines Formulars (kein Form) Din A4 Blatt

VB.NET-Quellcode

VB.NET-Quellcode

VB.NET-Quellcode

VB.NET-Quellcode

Ähnliche Themen

1 Benutzer hat hier geschrieben