Imprimir um arquivo de texto de várias páginas (Windows Forms .NET)
É comum que aplicativos baseados no Windows imprimam texto. A classe Graphics fornece métodos para desenhar objetos (gráficos ou texto) para um dispositivo, como uma tela ou impressora. A seção a seguir descreve em detalhes o processo para imprimir o arquivo de texto. Este método não suporta a impressão de ficheiros de texto não simples, como um documento do Office Word ou um ficheiro PDF
Observação
Os métodos DrawText de TextRenderer não são suportados para a impressão. Você deve sempre usar os métodos DrawString de Graphics, como mostrado no exemplo de código a seguir, para desenhar texto para fins de impressão.
Para imprimir texto
No Visual Studio, clique duas vezes no formulário a partir do qual pretende imprimir, no painel
Solution Explorer. Isso abre o Visual Designer. Na Caixa de Ferramentas , clique duas vezes no componente PrintDocument para adicioná-lo ao formulário. Isso deve criar um componente
PrintDocument
com o nomeprintDocument1
.Adicione um
Button
ao formulário ou use um botão que já esteja no formulário.No Visual Designer do formulário, selecione o botão. No painel de Propriedades , selecione o botão de filtro de eventos e, em seguida, clique duas vezes no evento
Click
para gerar um manipulador de eventos.O código de evento
Click
deve estar visível. Fora do escopo do manipulador de eventos, adicione uma variável de cadeia de caracteres privada à classe chamadastringToPrint
.private string stringToPrint="";
'Private PrintDocument1 As New PrintDocument() Private stringToPrint As String
De volta ao código do manipulador de eventos
Click
, defina a propriedade DocumentName como o nome do documento. Esta informação é enviada para a impressora. Em seguida, leia o conteúdo do texto do documento e armazene-o na cadeia de caracteresstringToPrint
. Finalmente, chame o método Print para gerar o evento PrintPage. O métodoPrint
é destacado abaixo.private void button1_Click(object sender, EventArgs e) { string docName = "testPage.txt"; string docPath = @"C:\"; string fullPath = System.IO.Path.Combine(docPath, docName); printDocument1.DocumentName = docName; stringToPrint = System.IO.File.ReadAllText(fullPath); printDocument1.Print(); }
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Dim docName As String = "testPage.txt" Dim docPath As String = "C:\" Dim fullPath As String = System.IO.Path.Combine(docPath, docName) PrintDocument1.DocumentName = docName stringToPrint = System.IO.File.ReadAllText(fullPath) PrintDocument1.Print() End Sub
Volte para o Visual Designer do formulário e selecione o componente
PrintDocument
. No painel Propriedades, selecione o filtro de eventos e clique duas vezes no evento para gerar um manipulador de eventos. No manipulador de eventos PrintPage, use a propriedade Graphics da classe PrintPageEventArgs e o conteúdo do documento para calcular o comprimento da linha e as linhas por página. Depois de cada página ser desenhada, verifique se é a última página e ajuste a propriedade HasMorePages do
PrintPageEventArgs
em conformidade. O eventoPrintPage
é acionado até queHasMorePages
sejafalse
.No exemplo de código a seguir, o manipulador de eventos é usado para imprimir o conteúdo do arquivo "testPage.txt" na mesma fonte que é usada no formulário.
private void PrintDocument1_PrintPage(object sender, System.Drawing.Printing.PrintPageEventArgs e) { int charactersOnPage = 0; int linesPerPage = 0; // Sets the value of charactersOnPage to the number of characters // of stringToPrint that will fit within the bounds of the page. e.Graphics.MeasureString(stringToPrint, this.Font, e.MarginBounds.Size, StringFormat.GenericTypographic, out charactersOnPage, out linesPerPage); // Draws the string within the bounds of the page e.Graphics.DrawString(stringToPrint, this.Font, Brushes.Black, e.MarginBounds, StringFormat.GenericTypographic); // Remove the portion of the string that has been printed. stringToPrint = stringToPrint.Substring(charactersOnPage); // Check to see if more pages are to be printed. e.HasMorePages = (stringToPrint.Length > 0); }
Private Sub PrintDocument1_PrintPage(ByVal sender As Object, ByVal e As PrintPageEventArgs) Handles PrintDocument1.PrintPage Dim charactersOnPage As Integer = 0 Dim linesPerPage As Integer = 0 ' Sets the value of charactersOnPage to the number of characters ' of stringToPrint that will fit within the bounds of the page. e.Graphics.MeasureString(stringToPrint, Me.Font, e.MarginBounds.Size, StringFormat.GenericTypographic, charactersOnPage, linesPerPage) ' Draws the string within the bounds of the page e.Graphics.DrawString(stringToPrint, Me.Font, Brushes.Black, e.MarginBounds, StringFormat.GenericTypographic) ' Remove the portion of the string that has been printed. stringToPrint = stringToPrint.Substring(charactersOnPage) ' Check to see if more pages are to be printed. e.HasMorePages = stringToPrint.Length > 0 End Sub
Ver também
.NET Desktop feedback