Я пытаюсь удалить границы вокруг ячеек в таблице, используя iText7 in. NET. Я пробовал SetBorder (Border.NO_BORDER) везде без удачи. Смотрите код и pdf ниже:
Dim writer As New PdfWriter(dest)
Dim pdf As New PdfDocument(writer)
Dim pdfdoc As New Document(pdf)
pdfdoc.SetMargins(5, 5, 5, 15)
Dim CLSHdr As New Table({100, 470, 370}) : CLSHdr.SetBorder(Border.NO_BORDER)
Dim AddTbl As New Table(1) : AddTbl.SetBorder(Border.NO_BORDER)
Dim pdfCell As New Cell : pdfCell.SetBorder(Border.NO_BORDER)
Dim logo As New Image(ImageDataFactory.Create("Image.jpg")) : logo.Scale(0.5, 0.5)
pdfCell.Add(logo)
CLSHdr.AddCell(pdfCell)
CLSHdr.SetBorder(Border.NO_BORDER)
CLSHdr.AddCell(New Cell().Add(New Paragraph(" "))).SetBorder(Border.NO_BORDER)
CLSHdr.SetBorder(Border.NO_BORDER)
pdfCell = New Cell().Add(New Paragraph("First Row"))
pdfCell.SetBorder(Border.NO_BORDER).SetMaxHeight(16)
AddTbl.AddCell(pdfCell)
pdfCell = New Cell().Add(New Paragraph("Second Row"))
pdfCell.SetBorder(Border.NO_BORDER).SetMaxHeight(16)
AddTbl.AddCell(pdfCell)
pdfCell = New Cell().Add(New Paragraph("Third Row"))
pdfCell.SetBorder(Border.NO_BORDER).SetMaxHeight(16)
AddTbl.AddCell(pdfCell)
pdfCell = New Cell().Add(New Paragraph("Fourth"))
pdfCell.SetBorder(Border.NO_BORDER).SetMaxHeight(16)
AddTbl.AddCell(pdfCell)
AddTbl.SetBorder(Border.NO_BORDER)
CLSHdr.SetBorder(Border.NO_BORDER)
CLSHdr.AddCell(AddTbl).SetWidth(500).SetBorder(Border.NO_BORDER)
pdfdoc.Add(CLSHdr).SetBorder(Border.NO_BORDER)
pdfdoc.Close()
Полученный pdf: