ReportViewer/ LocalReport: schwarz-weißer Druck via Code ...

15/01/2009 - 16:37 von Frank Boehland | Report spam
Ein freundliches Hallo,

ich erzeuge und drucke einen lokalen Report gemàß "Anleitung: Drucken
mithilfe des LocalReport-Objekts (VB)".

Ich möchte den Drucker via Code anweisen, den Druck schwarz-weiß auszuführen.

Private Sub PrintPage(ByVal sender As Object, ByVal ev As PrintPageEventArgs)

Dim pageImage As New Metafile(m_streams(m_currentPageIndex))
ev.Graphics.DrawImage(pageImage, ev.PageBounds)

ev.PageSettings.Color = False

m_currentPageIndex += 1
ev.HasMorePages = (m_currentPageIndex < m_streams.Count)
End Sub

Ich erhalte dennoch den Farbausdruck. Wo muss ich PageSettings.Color überall
bzw. richtig setzen, um den schwarz-weißen Ausdruck zu erhalten. Muss ich
schon bei "report.Render("Image", ..." reagieren, um eine schwarz-weiße
Grafik (hier EMF) zu erstellen?

Ich hoffe auf Anregungen ...

Danke
Frank
 

Lesen sie die antworten

#1 Stefan Simon
15/01/2009 - 17:11 | Warnen spam
"Frank Boehland" schrieb im
Newsbeitrag news:

Ich möchte den Drucker via Code anweisen, den Druck schwarz-weiß
auszuführen.

Private Sub PrintPage(ByVal sender As Object, ByVal ev As
PrintPageEventArgs)

Dim pageImage As New Metafile(m_streams(m_currentPageIndex))
ev.Graphics.DrawImage(pageImage, ev.PageBounds)

ev.PageSettings.Color = False

m_currentPageIndex += 1
ev.HasMorePages = (m_currentPageIndex < m_streams.Count)
End Sub

Ich erhalte dennoch den Farbausdruck. Wo muss ich PageSettings.Color
überall
bzw. richtig setzen, um den schwarz-weißen Ausdruck zu erhalten. Muss ich
schon bei "report.Render("Image", ..." reagieren, um eine schwarz-weiße
Grafik (hier EMF) zu erstellen?

Ich hoffe auf Anregungen ...



Drucke nicht als EMF sondern als TIFF und gib ColorDepth in den DeviceInfos
an.

Stefan

Ähnliche fragen