Anleitung: Drucken eines lokalen Berichts ohne Vorschau

Artikel
07/31/2015

In dieser Anleitung wird veranschaulicht, wie ein Druckvorgang ohne Anzeige des Berichts programmgesteuert mithilfe des LocalReport-Objekts und der CreateStreamCallback-Rückruffunktion ausgeführt werden kann.

Vorbereitungsmaßnahmen

Sie benötigen den Zugriff auf den Beispielbericht und die zugehörige Datenquelle.Weitere Informationen finden Sie unter Anleitung: Beispieldaten und Berichte zum Ausdrucken.

Führen Sie die folgenden Schritte aus, um ein Konsolenanwendungsprojekt zu erstellen.

Erstellen eines neuen Konsolenanwendungsprojekts

Zeigen Sie im Menü Datei auf Neu, und klicken Sie dann auf Projekt.
Wählen Sie im Bereich Installierte Vorlagen entweder C# oder Visual Basic aus.Der Knoten C# bzw. Visual Basic kann sich unter Andere Sprachen befinden. Dies hängt von den Starteinstellungen in Visual Studio ab.
Wählen Sie im Bereich Vorlagen die Option Konsolenanwendung aus.
Geben Sie im Feld Name den Namen des Projekts ein: PrintLocalReport.
Geben Sie im Feld Speicherort das Verzeichnis ein, in dem das Projekt gespeichert werden soll, oder klicken Sie auf Durchsuchen, um zu dem Verzeichnis zu navigieren.
Klicken Sie auf OK.Das Projekt wird geöffnet, und im Fenster Code wird die Codedatei Program angezeigt.

Hinzufügen von Verweisen

Wählen Sie im Menü Projekt den Befehl Verweis hinzufügen aus.
Wählen Sie im Dialogfeld Verweis hinzufügen auf der Registerkarte .NETSystem.Drawing, System.Windows.Forms und Microsoft.ReportViewer.Winforms aus.
Klicken Sie auf OK.

Hinzufügen der vorhandenen Dateien "report.rdlc" und "data.xml"

Wählen Sie im Menü Projekt die Option Vorhandenes Element hinzufügen aus.Das Dialogfeld Vorhandenes Element hinzufügen wird angezeigt.
Navigieren Sie zu dem Ordner, in dem Sie report.rdlc und data.xml gespeichert haben.Wählen Sie beide Dateien aus.
Klicken Sie auf Hinzufügen.Die beiden Dateien werden im Projektmappen-Explorer als Teil des Projekts angezeigt.

Hinzufügen des Codes

Die Codedatei Program sollte bereits zum Bearbeiten geöffnet sein.Wenn dies nicht der Fall ist, doppelklicken Sie im Fenster des Projektmappen-Explorers auf die Datei Program.cs oder Module1.vb.

Ersetzen Sie vorhandenen Code in der Datei Program durch den folgenden Code in der Programmiersprache Ihrer Wahl.

Hinweis

Falls auf Ihrem Computer kein Drucker mit dem Namen "Microsoft XPS Document Writer" installiert ist, ändern Sie den fett formatierten Code in den Namen eines Druckers, der auf dem Computer vorhanden ist.

using System;
using System.IO;
using System.Data;
using System.Text;
using System.Drawing.Imaging;
using System.Drawing.Printing;
using System.Collections.Generic;
using System.Windows.Forms;
using Microsoft.Reporting.WinForms;

public class Demo : IDisposable
{
    private int m_currentPageIndex;
    private IList<Stream> m_streams;

    private DataTable LoadSalesData()
    {
        // Create a new DataSet and read sales data file 
        //    data.xml into the first DataTable.
        DataSet dataSet = new DataSet();
        dataSet.ReadXml(@"..\..\data.xml");
        return dataSet.Tables[0];
    }
    // Routine to provide to the report renderer, in order to
    //    save an image for each page of the report.
    private Stream CreateStream(string name,
      string fileNameExtension, Encoding encoding,
      string mimeType, bool willSeek)
    {
        Stream stream = new MemoryStream();
        m_streams.Add(stream);
        return stream;
    }
    // Export the given report as an EMF (Enhanced Metafile) file.
    private void Export(LocalReport report)
    {
        string deviceInfo =
          @"<DeviceInfo>
                <OutputFormat>EMF</OutputFormat>
                <PageWidth>8.5in</PageWidth>
                <PageHeight>11in</PageHeight>
                <MarginTop>0.25in</MarginTop>
                <MarginLeft>0.25in</MarginLeft>
                <MarginRight>0.25in</MarginRight>
                <MarginBottom>0.25in</MarginBottom>
            </DeviceInfo>";
        Warning[] warnings;
        m_streams = new List<Stream>();
        report.Render("Image", deviceInfo, CreateStream,
           out warnings);
        foreach (Stream stream in m_streams)
            stream.Position = 0;
    }
    // Handler for PrintPageEvents
    private void PrintPage(object sender, PrintPageEventArgs ev)
    {
        Metafile pageImage = new
           Metafile(m_streams[m_currentPageIndex]);

        // Adjust rectangular area with printer margins.
        Rectangle adjustedRect = new Rectangle(
            ev.PageBounds.Left - (int)ev.PageSettings.HardMarginX,
            ev.PageBounds.Top - (int)ev.PageSettings.HardMarginY,
            ev.PageBounds.Width,
            ev.PageBounds.Height);

        // Draw a white background for the report
        ev.Graphics.FillRectangle(Brushes.White, adjustedRect);

        // Draw the report content
        ev.Graphics.DrawImage(pageImage, adjustedRect);

        // Prepare for the next page. Make sure we haven't hit the end.
        m_currentPageIndex++;
        ev.HasMorePages = (m_currentPageIndex < m_streams.Count);
    }

    private void Print()
    {
        if (m_streams == null || m_streams.Count == 0)
            throw new Exception("Error: no stream to print.");
        PrintDocument printDoc = new PrintDocument();
        if (!printDoc.PrinterSettings.IsValid)
        {
            throw new Exception("Error: cannot find the default printer.");
        }
        else
        {
            printDoc.PrintPage += new PrintPageEventHandler(PrintPage);
            m_currentPageIndex = 0;
            printDoc.Print();
        }
    }
    // Create a local report for Report.rdlc, load the data,
    //    export the report to an .emf file, and print it.
    private void Run()
    {
        LocalReport report = new LocalReport();
        report.ReportPath = @"..\..\Report.rdlc";
        report.DataSources.Add(
           new ReportDataSource("Sales", LoadSalesData()));
        Export(report);
        Print();
    }

    public void Dispose()
    {
        if (m_streams != null)
        {
            foreach (Stream stream in m_streams)
                stream.Close();
            m_streams = null;
        }
    }

    public static void Main(string[] args)
    {
        using (Demo demo = new Demo())
        {
            demo.Run();
        }
    }
}

Imports System
Imports System.IO
Imports System.Data
Imports System.Text
Imports System.Drawing
Imports System.Drawing.Imaging
Imports System.Drawing.Printing
Imports System.Collections.Generic
Imports System.Windows.Forms
Imports Microsoft.Reporting.WinForms

Public Class Demo
    Implements IDisposable
    Private m_currentPageIndex As Integer
    Private m_streams As IList(Of Stream)

    Private Function LoadSalesData() As DataTable
        ' Create a new DataSet and read sales data file 
        ' data.xml into the first DataTable.
        Dim dataSet As New DataSet()
        dataSet.ReadXml("..\..\data.xml")
        Return dataSet.Tables(0)
    End Function

    ' Routine to provide to the report renderer, in order to
    ' save an image for each page of the report.
    Private Function CreateStream(ByVal name As String, ByVal fileNameExtension As String, ByVal encoding As Encoding, ByVal mimeType As String, ByVal willSeek As Boolean) As Stream
        Dim stream As Stream = New MemoryStream()
        m_streams.Add(stream)
        Return stream
    End Function

    ' Export the given report as an EMF (Enhanced Metafile) file.
    Private Sub Export(ByVal report As LocalReport)
        Dim deviceInfo As String = "<DeviceInfo>" & _
            "<OutputFormat>EMF</OutputFormat>" & _
            "<PageWidth>8.5in</PageWidth>" & _
            "<PageHeight>11in</PageHeight>" & _
            "<MarginTop>0.25in</MarginTop>" & _
            "<MarginLeft>0.25in</MarginLeft>" & _
            "<MarginRight>0.25in</MarginRight>" & _
            "<MarginBottom>0.25in</MarginBottom>" & _
            "</DeviceInfo>"
        Dim warnings As Warning()
        m_streams = New List(Of Stream)()
        report.Render("Image", deviceInfo, AddressOf CreateStream, warnings)
        For Each stream As Stream In m_streams
            stream.Position = 0
        Next
    End Sub

    ' Handler for PrintPageEvents
    Private Sub PrintPage(ByVal sender As Object, ByVal ev As PrintPageEventArgs)
        Dim pageImage As New Metafile(m_streams(m_currentPageIndex))

        ' Adjust rectangular area with printer margins.
        Dim adjustedRect As New Rectangle(ev.PageBounds.Left - CInt(ev.PageSettings.HardMarginX), _
                                          ev.PageBounds.Top - CInt(ev.PageSettings.HardMarginY), _
                                          ev.PageBounds.Width, _
                                          ev.PageBounds.Height)

        ' Draw a white background for the report
        ev.Graphics.FillRectangle(Brushes.White, adjustedRect)

        ' Draw the report content
        ev.Graphics.DrawImage(pageImage, adjustedRect)

        ' Prepare for the next page. Make sure we haven't hit the end.
        m_currentPageIndex += 1
        ev.HasMorePages = (m_currentPageIndex < m_streams.Count)
    End Sub

    Private Sub Print()
        If m_streams Is Nothing OrElse m_streams.Count = 0 Then
            Throw New Exception("Error: no stream to print.")
        End If
        Dim printDoc As New PrintDocument()
        If Not printDoc.PrinterSettings.IsValid Then
            Throw New Exception("Error: cannot find the default printer.")
        Else
            AddHandler printDoc.PrintPage, AddressOf PrintPage
            m_currentPageIndex = 0
            printDoc.Print()
        End If
    End Sub

    ' Create a local report for Report.rdlc, load the data,
    ' export the report to an .emf file, and print it.
    Private Sub Run()
        Dim report As New LocalReport()
        report.ReportPath = "..\..\Report.rdlc"
        report.DataSources.Add(New ReportDataSource("Sales", LoadSalesData()))
        Export(report)
        Print()
    End Sub

    Public Sub Dispose() Implements IDisposable.Dispose
        If m_streams IsNot Nothing Then
            For Each stream As Stream In m_streams
                stream.Close()
            Next
            m_streams = Nothing
        End If
    End Sub

    Public Shared Sub Main(ByVal args As String())
        Using demo As New Demo()
            demo.Run()
        End Using
    End Sub
End Class

Erstellen eines Builds und Ausführen der Anwendung

Klicken Sie zum Erstellen der Anwendung im Menü Erstellen auf Projektmappe erstellen.Im Rahmen des Erstellungsprozesses wird der Bericht kompiliert, und alle festgestellten Fehler (z. B. ein Syntaxfehler in einem Ausdruck, der im Bericht verwendet wird) werden der Aufgabenliste hinzugefügt.
Drücken Sie F5, um die Anwendung auszuführen.

Mit dem oben dargestellten Beispielcode wird der Bericht in einer XPS-Datei ausgegeben, und Sie werden aufgefordert, einen Speicherort für die Datei anzugeben.Wenn Sie den Namen eines Druckers angeben, wird der Bericht direkt auf diesem Gerät ausgegeben.

Siehe auch

Referenz

LocalReport

CreateStreamCallback

Weitere Ressourcen

Beispiele und Anleitungen