LZWAutoClear Example for Visual Basic

Dim RasterIO As New LEADRasterIO
Dim nRet As Integer

nRet = RasterIO.Load(LEADRasterView1.Raster, "c:\1.jpg", 0, 0, 1)
RasterIO.LZWAutoClear = False

RasterIO.Save LEADRasterView1.Raster, "c:\1.tif", FILE_TIFLZW, 24, QFACTOR_LEAD_0, 0