Exemplarische Vorgehensweise: Drucken eines lokalen Berichts ohne Vorschau

Artikel
08/21/2008

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.

Erforderliche Komponenten

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 in Microsoft Visual Studio zu erstellen.

Erstellen eines neuen Konsolenanwendungsprojekts

Zeigen Sie im Menü Datei auf Neu, und wählen Sie dann Projekt aus.
Wählen Sie im Bereich Projekttypen die Optionen Visual C# oder Visual Basic und Windows aus.
Wählen Sie im Bereich Vorlagen die Option Konsolenanwendung aus, um eine Microsoft-Konsolenanwendung zu erstellen.
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 zum Verzeichnis zu navigieren. 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. Das Dialogfeld Verweis hinzufügen wird angezeigt.
Wählen Sie im Listenfeld, das auf der Registerkarte .NET angezeigt wird, System.Drawing, System.Windows.Forms und Microsoft.Reporting.Winforms aus.

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.

Verwenden Sie für Visual C# den folgenden Code.

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 FileStream(@"..\..\" + name +
           "." + fileNameExtension, FileMode.Create);
        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]);
        ev.Graphics.DrawImage(pageImage, ev.PageBounds);
        m_currentPageIndex++;
        ev.HasMorePages = (m_currentPageIndex < m_streams.Count);
    }

    private void Print()
    {
        const string printerName =
           "Microsoft Office Document Image Writer";
        if (m_streams == null || m_streams.Count == 0)
            return;
        PrintDocument printDoc = new PrintDocument();
        printDoc.PrinterSettings.PrinterName = printerName;
        if (!printDoc.PrinterSettings.IsValid)
        {
            string msg = String.Format(
               "Can't find printer \"{0}\".", printerName);
            MessageBox.Show(msg, "Print Error");
            return;
        }
        printDoc.PrintPage += new PrintPageEventHandler(PrintPage);
        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);
        m_currentPageIndex = 0;
        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();
        }
    }
}

Verwenden Sie für Visual Basic den folgenden Code.

Imports System.IO
Imports System.Data
Imports System.Text
Imports System.Drawing.Imaging
Imports System.Drawing.Printing
Imports System.Collections.Generic
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
        Dim dataSet As New DataSet()
        dataSet.ReadXml("..\..\data.xml")
        Return dataSet.Tables(0)
    End Function

    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 FileStream("..\..\" + _
             name + "." + fileNameExtension, FileMode.Create)
        m_streams.Add(stream)
        Return stream
    End Function

    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 = Nothing
        m_streams = New List(Of Stream)()
        report.Render("Image", deviceInfo, AddressOf CreateStream, _
           warnings)

        Dim stream As Stream
        For Each stream In m_streams
            stream.Position = 0
        Next
    End Sub

    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)

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

    Private Sub Print()
        Const printerName As String = _
          "Microsoft Office Document Image Writer"

        If m_streams Is Nothing Or m_streams.Count = 0 Then
            Return
        End If

        Dim printDoc As New PrintDocument()
        printDoc.PrinterSettings.PrinterName = printerName
        If Not printDoc.PrinterSettings.IsValid Then
            Dim msg As String = String.Format( _
                "Can't find printer ""{0}"".", printerName)
            Console.WriteLine(msg)
            Return
        End If
        AddHandler printDoc.PrintPage, AddressOf PrintPage
        printDoc.Print()
    End Sub

    Private Sub Run()
        Dim report As LocalReport = New LocalReport()
        report.ReportPath = "..\..\Report.rdlc"
        report.DataSources.Add(New ReportDataSource("Sales", _
           LoadSalesData()))

        Export(report)

        m_currentPageIndex = 0
        Print()
    End Sub

    Public Overloads Sub Dispose() Implements IDisposable.Dispose
        If Not (m_streams Is Nothing) Then
            Dim stream As Stream
            For Each 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 Demo = 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 gefundenen Fehler (z. B. Syntaxfehler in einem Ausdruck, der im Bericht verwendet wird) werden der Aufgabenliste hinzugefügt.
Drücken Sie F5, um die Anwendung auszuführen.

Siehe auch

Verweis

LocalReport
Microsoft.Reporting.WinForms.CreateStreamCallback
Microsoft.Reporting.WebForms.CreateStreamCallback

Weitere Ressourcen

Beispiele und Anleitungen

Freigeben über