Public Sub ChangeCompression( _
   ByVal compression As RasterCompression _
) 

Dim instance As RasterImage
Dim compression As RasterCompression
 
instance.ChangeCompression(compression)

public void ChangeCompression( 
   RasterCompression compression
)

public:
void ChangeCompression( 
   RasterCompression compression
) 

Public Sub ChangeCompressionTest()
      ' This method toggles image compression.
      Dim codecs As RasterCodecs = New RasterCodecs()

      ' Load the image compressed
      codecs.Options.Load.Compressed = True
      Dim image As RasterImage = codecs.Load(Path.Combine(LEAD_VARS.ImagesDir, "OCR1.TIF"))
      Dim str As String
      If image.IsCompressed Then
         str = "BEFORE - ImageSize: " & image.DataSize & " bytes, Type: " & ("Compressed")
      Else
         str = "BEFORE - ImageSize: " & image.DataSize & " bytes, Type: " & ("UnCompressed")
      End If
      Console.WriteLine(str, "ChangeCompression")
      If (image.IsCompressed = True) Then
         image.ChangeCompression(RasterCompression.None)
      Else
         image.ChangeCompression(RasterCompression.Rle)
      End If
      If image.IsCompressed Then
         str = "AFTER - ImageSize: " & image.DataSize & " bytes, Type: " & ("Compressed")
      Else
         str = "AFTER - ImageSize: " & image.DataSize & " bytes, Type: " & ("UnCompressed")
      End If
      Console.WriteLine(str, "ChangeCompression")

      ' Load the image super-compressed
      codecs.Options.Load.SuperCompressed = True
      image = codecs.Load(Path.Combine(LEAD_VARS.ImagesDir, "IMAGE1.CMP"))
      If image.IsSuperCompressed Then
         str = "BEFORE - ImageSize: " & image.DataSize & " bytes, Type: " & ("Compressed")
      Else
         str = "BEFORE - ImageSize: " & image.DataSize & " bytes, Type: " & ("UnCompressed")
      End If
      Console.WriteLine(str, "ChangeCompression")
      If (image.IsSuperCompressed = True) Then
         image.ChangeCompression(RasterCompression.None)
      Else
         image.ChangeCompression(RasterCompression.Super)
      End If
      If image.IsSuperCompressed Then
         str = "AFTER - ImageSize: " & image.DataSize & " bytes, Type: " & ("Compressed")
      Else
         str = "AFTER - ImageSize: " & image.DataSize & " bytes, Type: " & ("UnCompressed")
      End If
      Console.WriteLine(str, "ChangeCompression")

      image.Dispose()
      codecs.Dispose()
   End Sub

Public NotInheritable Class LEAD_VARS
   Public Const ImagesDir As String = "C:\Users\Public\Documents\LEADTOOLS Images"
End Class

public void ChangeCompressionTest()
   {
      // This method toggles image compression.
      RasterCodecs codecs = new RasterCodecs();

      // Load the image compressed
      codecs.Options.Load.Compressed = true;
      RasterImage image = codecs.Load(Path.Combine(LEAD_VARS.ImagesDir, "OCR1.TIF"));
      String str = "BEFORE - ImageSize: " + image.DataSize + " bytes, Type: " + (image.IsCompressed ? "Compressed" : "UnCompressed");
      Console.WriteLine(str, "ChangeCompression");
      image.ChangeCompression((image.IsCompressed == true) ? RasterCompression.None : RasterCompression.Rle);
      str = "AFTER - ImageSize: " + image.DataSize + " bytes, Type: " + (image.IsCompressed ? "Compressed" : "UnCompressed");
      Console.WriteLine(str, "ChangeCompression");

      // Load the image super-compressed
      codecs.Options.Load.SuperCompressed = true;
      image = codecs.Load(Path.Combine(LEAD_VARS.ImagesDir, "IMAGE1.CMP"));
      str = "BEFORE - ImageSize: " + image.DataSize + " bytes, Type: " + (image.IsSuperCompressed ? "Compressed" : "UnCompressed");
      Console.WriteLine(str, "ChangeCompression");
      image.ChangeCompression((image.IsSuperCompressed == true) ? RasterCompression.None : RasterCompression.Super);
      str = "AFTER - ImageSize: " + image.DataSize + " bytes, Type: " + (image.IsSuperCompressed ? "Compressed" : "UnCompressed");
      Console.WriteLine(str, "ChangeCompression");

      image.Dispose();
      codecs.Dispose();
   }

static class LEAD_VARS
{
   public const string ImagesDir = @"C:\Users\Public\Documents\LEADTOOLS Images";
}