Passo a passo: Impressão de um relatório local sem visualização
Este passo a passo mostra como imprimir um relatório programaticamente sem exibi-la, usando o LocalReport objeto e o CreateStreamCallback função de retorno de chamada.
Pré-requisitos
Você deve ter acesso à fonte de dados e relatórios de exemplo. Para obter mais informações, consulte Passo a passo de dados de amostra e relatório para impressão.
Execute as seguintes etapas para criar um projeto de aplicativo de Console.
Criar um novo projeto de aplicativo de console
No menu Arquivo, aponte para Novo e selecione Projeto.
No modelos instalados painel, escolha c# ou Visual Basic. O c# ou Visual Basic nó pode estar em outros idiomas, dependendo de suas configurações de inicialização em Visual Studio.
No modelos painel, escolha aplicativo de Console.
No nome , digite o nome do projeto: PrintLocalReport.
Na caixa de Local , digite o diretório em que você deseja salvar o projeto, clique em Procurar para navegar até ela.
Clique em OK. O projeto será aberto com o código janela mostrando o arquivo de código de programa.
Adicionar referências
Do projeto menu, selecione adicionar referência.
No adicionar referência caixa de diálogo de .NET selecione System.Drawing, System.Windows.Forms, e Microsoft.ReportViewer.Winforms.
Clique em OK.
Adicionar data e report.rdlc de arquivos existentes
No menu Projeto, selecione Adicionar Item Existente. O Add Existing Item caixa de diálogo será exibida.
Navegue até a pasta onde você salvou report.rdlc e data. Selecione os dois arquivos.
Clique em Adicionar. Os dois arquivos aparecem no Solution Explorer como parte do projeto.
Adicione o código
O arquivo de código do programa já deve estar aberto para edição. Se não estiver, clique duas vezes no arquivo Program.cs ou Module1. vb no Solution Explorer janela.
Substitua o código existente no arquivo de programa com o seguinte código de sua escolha de linguagem de programação.
Dica
Se seu local não for uma impressora chamada Microsoft XPS Document Writer instalado em seu computador, altere o código em negrito a uma impressora nomeada na sua máquina.
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
Compilar e executar o aplicativo
Sobre o criar menu, clique na Build Solution para compilar o aplicativo. Como parte do processo de compilação, o relatório é compilado e todos os erros encontrados (por exemplo, um erro de sintaxe em uma expressão usada no relatório) são adicionados para o lista de tarefas.
Pressione F5 para executar o aplicativo.
O código acima imprime o relatório para um arquivo. XPS e solicitar o local do arquivo. Se você especificar o nome de um dispositivo de impressão, ele imprimirá o relatório para esse dispositivo diretamente.