4
我有一堆PDF,我只是試圖打開,調整頁面大小,然後保存。我也希望文件大小會顯着縮小。我正在使用iTextSharp並且調整大小工作得很好,但文件大小几乎相同,實際上稍大一些。這裏是我現在的功能:如何使用iTextSharp調整pdf的大小
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()
有沒有人知道我可能會錯過實際獲得文件大小?
謝謝。
我要從這裏推斷並說實現我的目標,然後,我需要提取圖像,然後操縱它,並將它們放回到一個新的PDF中。幸運的是,你可以幫助d地址在這裏的問題:http://stackoverflow.com/questions/802269/itextsharp-extract-images – Ryan 2009-07-09 14:50:34