Save (ILEADRasterMrc) example for Visual Basic
Dim RasterMrc As LEADRasterMrc
RasterMrc.MaskCoder = MRC_MASK_COMPRESSION_JBIG
RasterMrc.PictureCoder = MRC_PICTURE_COMPRESSION_JPEG
RasterMrc.PictureQFactor = 2
RasterMrc.Grayscale2BitCoder = MRC_GRAYSCALE_COMPRESSION_JBIG_2BIT
RasterMrc.Grayscale8BitCoder = MRC_GRAYSCALE_COMPRESSION_GRAYSCALE_JPEG_8BIT
RasterMrc.Grayscale8BitQFactor = 2
RasterMrc.Text2BitCoder = MRC_TEXT_COMPRESSION_JBIG_2BIT
RasterMrc.Save Me.ActiveForm.LEADRasterView1.Raster, "c:\test.mrc", FILE_LEAD_MRC, 0, SAVE_OVERWRITE
RasterMrc.SaveT44 Me.ActiveForm.LEADRasterView1.Raster, "c:\testT44.mrc", FILE_MRC, 0, SAVE_OVERWRITE