5

我有一堆 PDF，我只是想打开它们，调整页面大小，然后保存。我也希望这样做文件大小会显着缩小。我正在使用 iTextSharp 并且调整大小工作得很好，但文件大小几乎相同，实际上稍微大一点。这是我现在拥有的功能：

    Dim reader As New PdfReader(inPDF)
    Dim doc As New Document(PageSize.LETTER)
    Document.Compress = True
    Dim writer As PdfWriter = PdfWriter.GetInstance(doc, New FileStream(outPDF, FileMode.Create))
    doc.Open()
    Dim cb As PdfContentByte = writer.DirectContent

    Dim page As PdfImportedPage
    For pageNumber As Long = 1 To reader.NumberOfPages
        page = writer.GetImportedPage(reader, pageNumber)
        cb.AddTemplate(page, PageSize.LETTER.Width / reader.GetPageSize(pageNumber).Width, 0, 0, PageSize.LETTER.Height / reader.GetPageSize(pageNumber).Height, 0, 0)
        doc.NewPage()
    Next pageNumber
    doc.Close()

有谁知道我可能缺少什么来实际减小文件大小？

谢谢。

4

1 回答 1

2

减小页面大小只是减小页面大小；您没有删除任何内容，因此文件大小不会改变。

减小文件大小的三种方法；删除内容，确保文本对象被压缩，和/或确保图像有效。

所谓高效图像，我的意思是图像不会比它们需要的大，并且使用了正确的压缩方式。您可以使用一个巨大的图像，比如 1800 像素宽，然后在 pdf 中将其缩放为 2.5"。如果这样做，即使显示为 2.5 英寸宽，它仍然是 1800 像素宽。您可以缩小文件通过调整图像大小来调整图像大小 - 在这种情况下，对于 300 dpi 打印分辨率，它只需要 750 像素宽。对于标准 pdf 72 dpi 分辨率，您只需要 202 像素宽的图像。

许多生成 pdf 的程序会自动使用 jpeg。如果图像是 2 色，例如发票或支票扫描，则使用具有 G4 压缩的 tiff 将使文件大小比 jpeg 小得多。

于 2009-07-09T00:19:37.377 回答