Convert PDF to Multipage CCITT4 TIFF image

[Loïc]

Here a simple way to convert a PDF to Multipage CCITT4 TIFF image (1 bpp image). To keep image color just use another compression scheme and remove the call to ConvertTo1bpp.

Code: Select all

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim GdViewer1 As New GdPicture.GdViewer
        Dim oGdPictureImaging As New GdPicture.GdPictureImaging
        Dim ImageID As Integer
        Dim TiffImageID As Integer


        oGdPictureImaging.SetLicenseNumber("XXX")
        GdViewer1.DisplayFromFile("")

        If GdViewer1.GetDocumentType = DocumentType.DocumentTypePDF Then
            For I As Integer = 1 To GdViewer1.PageCount
                ImageID = GdViewer1.PdfRenderPageToGdPictureImage(200, I)

                oGdPictureImaging.ConvertTo1Bpp(ImageID)

                If I = 1 Then
                    TiffImageID = ImageID
                    oGdPictureImaging.TiffSaveAsMultiPageFile(TiffImageID, "c:\output.tif", TiffCompression.TiffCompressionCCITT4)
                Else
                    oGdPictureImaging.TiffAddToMultiPageFile(TiffImageID, ImageID)
                    oGdPictureImaging.ReleaseGdPictureImage(ImageID)
                End If

            Next I
            oGdPictureImaging.TiffCloseMultiPageFile(TiffImageID)
        End If

        GdViewer1.CloseDocument()
    End Sub

[kketterman]

Thank you, this works wonderfully.

[PatNalen]

Trying your code but can't find method of oGdViewer you are using - PdfRenderPageToGdPictureImage. I don't have that method.

Also in my version, the Tiff Save method is called "TiffSaveMultiPageToFile" - yours is slightly different "TiffSaveAsMultiPageFile" - is that a typo or are we looking at different versions?

[Loïc]

Hi,

You are in the GdPicture.NET section. I suppose you are using the ActiveX. So, Have a look on this thread: viewtopic.php?t=314

Kind regards,

Loïc