Public Function New()

Dim instance As New IntelligentDownScaleCommand()

public IntelligentDownScaleCommand()

public:
IntelligentDownScaleCommand();

Public Sub IntelligentDownScaleCommandExample()
   ' Load an image
   Dim Codecs As RasterCodecs = New RasterCodecs()
   Codecs.ThrowExceptionsOnInvalidImages = True

   Dim image As RasterImage = Codecs.Load(Path.Combine(LEAD_VARS.ImagesDir, "Sample3.cmp"))

   Dim Command As IntelligentDownScaleCommand = New IntelligentDownScaleCommand()
   Command.DownScalingOrder = 1
   Command.NewWidth = image.Width - 100
   Command.NewHeight = image.Height
   Command.UsePreserveObjectColor = False
   Command.UseRemoveObjectColor = False

   ' Apply the intelligent downscale on the image.
   Command.Run(image)
   Codecs.Save(image, Path.Combine(LEAD_VARS.ImagesDir, "IntelligentDownScaleResult.jpg"), RasterImageFormat.Jpeg, 24)

End Sub


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

public void IntelligentDownScaleCommandExample()
   {
      // Load an image
      RasterCodecs codecs = new RasterCodecs();
      codecs.ThrowExceptionsOnInvalidImages = true;

      RasterImage image = codecs.Load(Path.Combine(LEAD_VARS.ImagesDir, "Sample3.cmp"));

      IntelligentDownScaleCommand command = new IntelligentDownScaleCommand();
      command.DownScalingOrder = 1;
      command.NewWidth = image.Width - 100;
      command.NewHeight = image.Height;
      command.UsePreserveObjectColor = false;
      command.UseRemoveObjectColor = false;

      // Apply the intelligent downscale on the image.
      command.Run(image);
      codecs.Save(image, Path.Combine(LEAD_VARS.ImagesDir, "IntelligentDownScaleResult.jpg"), RasterImageFormat.Jpeg, 24);

   }

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