减少 iTextSharp 上的段落换行高度

当段落长度对于 ColumnText 的宽度来说太长时，如何减少换行符的高度？

我尝试了以下方法，因为我看到了其他问题的答案：

p.Leading = 0

但这并没有产生任何影响。

我也尝试过增加Leading to 100看看是否添加了更大的换行符，但两者都不起作用。

SpacingBefore/SpacingAfter 也没有帮助：

p.SpacingBefore = 0
p.SpacingAfter = 0

我怎样才能减少这个？

使用表格时，您需要设置单元格本身的行距。但是，您会看到Leading属性是只读的，因此您需要使用SetLeading()方法采用两个值，第一个是固定前导，第二个是相乘前导。根据到这里的这篇文章:

乘法基本上意味着字体越大，前导也越大。固定意味着任何字体大小都具有相同的行距。

要将行距缩小到 80%，您可以使用：

Dim P1 As New Paragraph("It was the best of times, it was the worst of times")
Dim C1 As New PdfPCell(P1)
C1.SetLeading(0, 0.8)

EDIT

抱歉，我看到了《专栏》，我缺乏咖啡的大脑就到了餐桌上。

For a ColumnText您应该能够很好地使用段落的主值。

Dim cb = writer.DirectContent
Dim ct As New ColumnText(cb)

ct.SetSimpleColumn(0, 0, 200, 200)
Dim P1 As New Paragraph("It was the best of times, it was the worst of times")
''//Disable fixed leading
P1.Leading = 0
''//Set a font-relative leading
P1.MultipliedLeading = 0.8
ct.AddElement(P1)
ct.Go()

在我运行 iTextSharp 5.1.2.0 的机器上，这会生成两行稍微挤压在一起的文本。