原創|其它|編輯:郝浩|2012-12-18 11:25:20.000|閱讀 410 次
概述:在使用GdPicture.NET的時候,可以從PDF Stream中加載,并直接轉換為Tiff Stream,在實際操作性上方便了不少。
# 界面/圖表報表/文檔/IDE等千款熱門軟控件火熱銷售中 >>
相關鏈接:
GdPicture.NET可以將多頁PDF文件轉換為多頁TIFF文件,但是很多人在此之后都是對生成的文件進行物理保存。實際上在使用GdPicture.NET的時候,可以從PDF Stream中加載,并直接轉換為Tiff Stream,在實際操作性上方便了不少。
示例代碼如下:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim oGdPictureImaging As New GdPicture.GdPictureImaging Dim MultiTiffID As Integer oGdPictureImaging.SetLicenseNumber("XXX") Dim PdfID As Integer = oGdPictureImaging.PdfReaderLoadFromFile("c:\test.pdf") If PdfID <> 0 Then For i As Integer = 1 To oGdPictureImaging.PdfReaderGetPageCount(PdfID) If oGdPictureImaging.GetStat = GdPicture.GdPictureStatus.OK Then oGdPictureImaging.PdfReaderSelectPage(PdfID, i) Dim RasterizedPageID As Integer = oGdPictureImaging.PdfReaderRenderPageToGdPictureImage(PdfID, 200, True) '200 DPI, can be changed. If i = 1 Then MultiTiffID = oGdPictureImaging.TiffCreateMultiPageFromGdPictureImage(RasterizedPageID) Else oGdPictureImaging.TiffAppendPageFromGdPictureImage(MultiTiffID, RasterizedPageID) End If oGdPictureImaging.ReleaseGdPictureImage(RasterizedPageID) End If Next Dim strm As New IO.MemoryStream oGdPictureImaging.SaveAsStream(MultiTiffID, strm, GdPicture.DocumentFormat.DocumentFormatTIFF, 65536) oGdPictureImaging.ReleaseGdPictureImage(MultiTiffID) oGdPictureImaging.PdfReaderCloseDocument(PdfID) End If End Sub
本站文章除注明轉載外,均為本站原創或翻譯。歡迎任何形式的轉載,但請務必注明出處、不得修改原文相關鏈接,如果存在內容上的異議請郵件反饋至chenjj@fc6vip.cn
文章轉載自:慧都控件網