Hallo zusammen,
da ich beim PrintDocument in der Vorschau die Gesamtanzahl der Seiten anzeigen möchte muss zusätzlich ein Label in die "Menüleste" des PrintViewDialog eingebunden werden. Dies habe ich auch geschaft.
Jetzt ist aber die Reihenfolge der Controls nicht so wie ich mir das vorstelle.
Ich möchte die Anzeige folgender maßen haben:
Seite x von y
Ich habe da folgenden Ansatz
[highlight=vbnet] Private lblPageCount As ToolStripLabel
With PrintPreviewDialog
'Versuche hier NumericUpDown zu löschen um es dann in anderer Reihenfolge wieder einzufügen
Dim MyNumUpD As New NumericUpDown
MyNumUpD = (CType(.Controls(1).Controls(0), NumericUpDown))
.Controls(1).Controls.Remove(MyNumUpD)
'Hier Label Seite löschen
Dim PrintPreviewToolbar As ToolStrip = CType(.Controls(1), ToolStrip)
Dim lblPage As ToolStripLabel = CType(PrintPreviewToolbar.Items(11), ToolStripLabel)
PrintPreviewToolbar.Items.Remove(lblPage)
'hier alles wieder in richtiger Reihenfolge einfügen
lblPageCount = New ToolStripLabel
lblPageCount.Alignment = ToolStripItemAlignment.Right
PrintPreviewToolbar.Items.Add(lblPageCount)
.Controls(1).Controls.Add(MyNumUpD) 'läßt sich hier nicht einfügen, es kommt ein Fehler
PrintPreviewToolbar.Items.Add(lblPage)
End With
[/highlight]
Hat jeman eine Idee wie ich das NumericUpDown Control da wieder rein bekomme bzw. wie ich die Reihenfolge wie gewünscht ändern kann...???
Bin für jeden Tipp dankbar...
da ich beim PrintDocument in der Vorschau die Gesamtanzahl der Seiten anzeigen möchte muss zusätzlich ein Label in die "Menüleste" des PrintViewDialog eingebunden werden. Dies habe ich auch geschaft.
Jetzt ist aber die Reihenfolge der Controls nicht so wie ich mir das vorstelle.
Ich möchte die Anzeige folgender maßen haben:
Seite x von y
Ich habe da folgenden Ansatz
[highlight=vbnet] Private lblPageCount As ToolStripLabel
With PrintPreviewDialog
'Versuche hier NumericUpDown zu löschen um es dann in anderer Reihenfolge wieder einzufügen
Dim MyNumUpD As New NumericUpDown
MyNumUpD = (CType(.Controls(1).Controls(0), NumericUpDown))
.Controls(1).Controls.Remove(MyNumUpD)
'Hier Label Seite löschen
Dim PrintPreviewToolbar As ToolStrip = CType(.Controls(1), ToolStrip)
Dim lblPage As ToolStripLabel = CType(PrintPreviewToolbar.Items(11), ToolStripLabel)
PrintPreviewToolbar.Items.Remove(lblPage)
'hier alles wieder in richtiger Reihenfolge einfügen
lblPageCount = New ToolStripLabel
lblPageCount.Alignment = ToolStripItemAlignment.Right
PrintPreviewToolbar.Items.Add(lblPageCount)
.Controls(1).Controls.Add(MyNumUpD) 'läßt sich hier nicht einfügen, es kommt ein Fehler
PrintPreviewToolbar.Items.Add(lblPage)
End With
[/highlight]
Hat jeman eine Idee wie ich das NumericUpDown Control da wieder rein bekomme bzw. wie ich die Reihenfolge wie gewünscht ändern kann...???
Bin für jeden Tipp dankbar...