Bonjour,

Je suis actuellement en train de travailler avec iText en VB.NET pour créer des PDF je ne comprend pas certaine choses :

1 - Je voudrai mettre du texte dans les cellules mais des fois sur deux lignes, voir avec une police ou format différent suivant la ligne comment je pourrai faire ça car il en prend pas en compte par exemple les "\n"comme en C

2 - Je cherche comment je pourrai définir la taille des cellules en largeur et hauteur, j'ai essayé avec width par exemple en utilisant un get/set mais je crache au moment de set la valeur. Je ne comprends donc pas comment set une valeur pour définir la taille

3 - je voudrai aussi modifier le format du PDF, définir la hauteur et la largeur de la feuille PDF en elle même.

Voici ci-dessous mon code :

  Dim Cell As PdfPCell

    Public Property SetColspan() As Integer
        Get
            Return Cell.Colspan
        End Get
        Set(ByVal value As Integer)
            Cell.Colspan = value
        End Set
    End Property

    Public Property SetWidth() As Single
        Get
            Return Cell.Width
        End Get
        Set(ByVal value As Single)
            Cell.Width = value
        End Set
    End Property

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim pdfDoc As New Document
        Dim pdfWrite As PdfWriter = PdfWriter.GetInstance(pdfDoc, New FileStream("C:\Users\stempi\Desktop\Test.pdf", FileMode.Create))

        pdfDoc.Open()

        Dim EAN128 As New Barcode128

        EAN128.CodeType = Barcode128.CODE128
        EAN128.Code = "(00)030328417153500179"
        EAN128.GenerateChecksum = True

        'pdfDoc.Add(EAN128.CreateImageWithBarcode(pdfWrite.DirectContent, Nothing, Nothing))

        Dim img As Image = EAN128.CreateImageWithBarcode(pdfWrite.DirectContent, Nothing, Nothing)

        Dim myTable As New PdfPTable(2)

        'première ligne
        Cell = New PdfPCell(New Phrase("Cellule 1"))
        SetWidth = 4.5
        SetColspan = 2
        myTable.AddCell(Cell)

        'Deuxième ligne
        Cell = New PdfPCell(New Phrase("Cellule 2"))
        SetColspan = 2
        myTable.AddCell(Cell)

        'Troisième ligne
        Cell = New PdfPCell(New Phrase("Cellule 3"))
        SetColspan = 2
        myTable.AddCell(Cell)

        'Quatrième ligne
        myTable.AddCell("Cellule 4.1")
        myTable.AddCell("Cellule 4.2")

        'Cinquième ligne
        Cell = New PdfPCell(New Phrase("Cellule 5"))
        SetColspan = 2
        myTable.AddCell(Cell)

        'Sixième ligne
        Cell = New PdfPCell(New Phrase("Cellule 6"))
        SetColspan = 2
        myTable.AddCell(Cell)

        'septième ligne
        Cell = New PdfPCell(img)
        SetColspan = 2
        myTable.AddCell(Cell)

        pdfDoc.Add(myTable)

        'pdfDoc.Add(Barcode.CreateImageWithBarcode(pdfWrite.DirectContent, Nothing, Nothing))

        'pdfDoc.Add(New Paragraph("Test Page 1"))
        'pdfDoc.NewPage()
        'pdfDoc.Add(New Paragraph("Test Page 2"))
        pdfDoc.Close()

    End Sub

ainsi que les imports :

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

voilà si quelqu'un pourrai m'éguiller la dessus ça serait super sympa car je bloque vraiment là merci