none
Numerar paginas en itextsharp RRS feed

  • Pregunta

  • Hola estoy trabajando con itextsharp y quiero numerar las paginas del pdf que genero hasta ahora si puedo hacer que me ponga el numero de pagina pero lo coloca al inicio de cada pagina yo quiero colocarlo al final ya sea en el medio o a la derecha pero no he podido este el codigo que tengo con este se genera lo unico que no he podido es posicionarlo como quiero aqui dejo el codigo al igual es solo una pequeña cosa la que me falta de antemano Gracias foro.

    Codigo:

    Imports iTextSharp.text.pdf
    Imports iTextSharp.text
    Imports iTextSharp.text.Font
    Imports System.IO

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
            'Module Module1
            'Sub Main()
            Dim pdfDoc As New Document()
            Dim pdfWrite As PdfWriter = PdfWriter.GetInstance(pdfDoc, New FileStream("mi.pdf", FileMode.Create))
            Dim ev As New itsEvents
            pdfWrite.PageEvent = ev
            pdfDoc.Open()
            pdfDoc.Add(New Paragraph("Hola  "))
            pdfDoc.NewPage()
            pdfDoc.Add(New Paragraph("Hola Mundo "))
            pdfDoc.NewPage()
            pdfDoc.Add(New Paragraph("Hola Mundo de nuevo"))
            pdfDoc.Close()
            System.Diagnostics.Process.Start("mi.pdf")
            'End Sub
            'End Module
        End Sub
        Public Class itsEvents
            Inherits PdfPageEventHelper
            Public Overrides Sub OnStartPage(ByVal writer As iTextSharp.text.pdf.PdfWriter, ByVal document As iTextSharp.text.Document)
                Dim ch As New Chunk("Pagina " & writer.PageNumber)
                document.Add(ch)
            End Sub
        End Class

    martes, 30 de julio de 2013 23:57

Todas las respuestas