彩票走势图

作为一款功能全面且可无限分发的文档图像处理工具包, GdPicture.NET不仅可实现文档生成，打印，也可以实现某些格式文件的合并，这里我们将给出一个使用GdPicture.NET实现合并多页TIFF文件的示例。

Dim fs1 As New FileStream("c:\multipage1.tif", FileMode.Open)
        Dim fs2 As New FileStream("c:\multipage2.tif", FileMode.Open)
        Dim fs3 As New FileStream("c:\output.tif", FileMode.CreateNew)

        Using oGdPictureImaging As New GdPictureImaging
            Dim ImageID As Integer = oGdPictureImaging.CreateGdPictureImageFromStream(fs1)
            Dim tiffID As Integer

            'Adding first multipage
            For i As Integer = 1 To oGdPictureImaging.TiffGetPageCount(ImageID)
                oGdPictureImaging.TiffSelectPage(ImageID, i)
                If i = 1 Then
                    tiffID = oGdPictureImaging.TiffCreateMultiPageFromGdPictureImage(ImageID)
                Else
                    oGdPictureImaging.TiffAppendPageFromGdPictureImage(tiffID, ImageID)
                End If
            Next
            oGdPictureImaging.ReleaseGdPictureImage(ImageID)

            ImageID = oGdPictureImaging.CreateGdPictureImageFromStream(fs2)

            'Adding second multipage
            For i As Integer = 1 To oGdPictureImaging.TiffGetPageCount(ImageID)
                oGdPictureImaging.TiffSelectPage(ImageID, i)
                oGdPictureImaging.TiffAppendPageFromGdPictureImage(tiffID, ImageID)
            Next
            oGdPictureImaging.ReleaseGdPictureImage(ImageID)

            'saving multipage to stream
            oGdPictureImaging.SaveAsStream(tiffID, fs3, DocumentFormat.DocumentFormatTIFF, 65536)
            oGdPictureImaging.ReleaseGdPictureImage(tiffID)
        End Using

        fs1.Dispose()
        fs2.Dispose()
        fs3.Dispose()