GdPicture Imaging SDK - Live Support Center

[sunseeker]

Hi Support,

could this code work?

Code: Select all

Public Sub SaveFile(Filename As String)
    Dim nImageID As Long
    If fs.FileExists(Filename) = False Then
        Imaging.TiffSaveAsNativeMultiPage Filename, CompressionCCITT4
        Imaging.TiffCloseNativeMultiPage
    Else
        Imaging.TiffAppendPageFromFile Imaging.GetNativeImage, Filename
        Imaging.TiffCloseNativeMultiPage
    End If
End Sub

[Loïc]

Hi,

What are you trying to do ?

Best regards,

Loïc

[sunseeker]

Here, i´d like to create a new MutliPage TIFF-File from the current loaded image

Code: Select all

Imaging.TiffSaveAsNativeMultiPage Filename, CompressionCCITT4
Imaging.TiffCloseNativeMultiPage

and here, i want append a existing Multipage TIFF-File from the current loaded image
Imaging.TiffAppendPageFromFile Imaging.GetNativeImage, Filename
Imaging.TiffCloseNativeMultiPage

Right way?

[Loïc]

Hi,

No right way at all


See this sample: http://www.gdpicture.com/samples/sample ... basic.html

Best regards,

Loïc