View Single Post
  #1  
Old 14-09-2005, 11:56
MrClark
Guest
 
Posts: n/a
Unhappy CorelDRAW 12 ExportBitmap

I'm upgrading my application from Corel DRAW 11 to 12 and exporting a Tiff file no longer works the same. I attempted to record the process of exporting a Tiff with the same options as I did manually and the files are not the same. As near as I can tell the recorded code does not include the thumbnail information.

Here is the recorded code
Code:
    Dim OrigSelection As ShapeRange
    Set OrigSelection = ActiveSelectionRange
    Dim expflt As ExportFilter
    Dim pal As StructPaletteOptions
    Set pal = New StructPaletteOptions
    With pal
        .PaletteType = cdrPaletteUniform
        .DitherType = cdrDitherNone
    End With
    Set expflt = ActiveDocument.ExportBitmap("C:\Temp\Avatar_Script.tif", cdrTIFF, cdrSelection, cdrPalettedImage, 1200, 1073, 200, 200, cdrNormalAntiAliasing, False, False, True, False, cdrCompressionLZW, pal)
    expflt.Finish
And the resultant file is attached along with the manual file.

I know the record function is lacking but I cannot find any reference to fixing the problem.

Last edited by MrClark; 14-09-2005 at 11:58.
Reply With Quote