Partager via


Procédure pas à pas : impression d'un rapport local sans aperçu

Cette procédure pas à pas montre comment imprimer un rapport par programme sans l'afficher, à l'aide de l'objet LocalReport et de la fonction de rappel CreateStreamCallback.

Composants requis

Vous devez avoir accès à l'exemple de rapport et à la source de données.Pour plus d'information, consultez Exemples de données et de rapport pour les procédures pas à pas d'impression.

Effectuez les étapes suivantes pour créer un projet d'application console.

Création d'un projet d'application console.

  1. Dans le menu Fichier, pointez sur Nouveau, puis sélectionnez Projet.

  2. Dans le volet Modèles installés, choisissez C# ou Visual Basic.Le nœud C# ou Visual Basic peut être situé sous Autres langages, selon les paramètres de démarrage dans Visual Studio.

  3. Dans le volet Modèles, choisissez Application console.

  4. Dans la zone Nom, tapez le nom du projet : PrintLocalReport.

  5. Dans la zone Emplacement, entrez le répertoire dans lequel vous désirez enregistrer votre projet ou bien cliquez sur Parcourir pour naviguer jusqu'à celui-ci.

  6. Cliquez sur OK.Le projet s'ouvre, la fenêtre Code affichant le fichier de code Programme.

Ajoutez des références

  1. Dans le menu Projet, choisissez Ajouter une référence.

  2. Dans la boîte de dialogue Ajouter une référence, sous l'onglet .NET, sélectionnez System.Drawing, System.Windows.Forms et Microsoft.ReportViewer.Winforms.

  3. Cliquez sur OK.

Ajouter les fichiers existants report.rdlc et data.xml

  1. Dans le menu Projet, sélectionnez Ajouter un élément existant.La boîte de dialogue Ajouter un élément existant s'affiche.

  2. Ouvrez le dossier dans lequel vous avez enregistré report.rdlc et data.xml.Sélectionnez les deux fichiers.

  3. Cliquez sur Ajouter.Les deux fichiers s'affichent dans l'Explorateur de solutions dans le cadre du projet.

Ajoutez le code

  1. Le fichier de code Program doit déjà être ouvert pour être modifié.Si ce n'est pas le cas, double-cliquez sur le fichier Program.cs ou Module1.vb dans la fenêtre Explorateur de solutions.

  2. Remplacez le code existant dans le fichier Programme par le code suivant dans le langage de programmation de votre choix.

    Notes

    Si aucune imprimante nommée Microsoft XPS Document Writer n'est installée sur votre ordinateur, remplacez le code en gras par une imprimante nommée sur votre ordinateur.

    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
    

Générez et exécutez l'application.

  1. Dans le menu Générer, cliquez sur Générer la solution pour générer l'application.Au cours du processus de génération, le rapport est compilé et les éventuelles erreurs détectées (par exemple une erreur de syntaxe dans une expression utilisée dans le rapport) sont ajoutées à la liste des tâches.

  2. Appuyez sur F5 pour exécuter l'application.

    Le code ci-dessus imprimera le rapport dans un fichier .xps et vous demandera l'emplacement du fichier.Si vous indiquez le nom d'un périphérique d'impression, le rapport sera imprimé directement sur ce périphérique.

Voir aussi

Référence

LocalReport

CreateStreamCallback

CreateStreamCallback

Autres ressources

Exemples et procédures pas à pas