Public Class SizeCommand 
   Inherits RasterCommand
   Implements IRasterCommand 

Dim instance As SizeCommand

public class SizeCommand : RasterCommand, IRasterCommand  

public ref class SizeCommand : public RasterCommand, IRasterCommand  

Public Sub SizeCommandExample()
      Dim codecs As RasterCodecs = New RasterCodecs()

      Dim srcFileName As String = Path.Combine(LEAD_VARS.ImagesDir, "Image1.cmp")
      Dim destFileName As String = Path.Combine(LEAD_VARS.ImagesDir, "SizeCommand.bmp")

      ' Load the source image from disk
      Dim image As RasterImage = codecs.Load(srcFileName)
      Dim command As SizeCommand = New SizeCommand()
      command.Width = 128
      command.Height = 128
      command.Flags = RasterSizeFlags.Resample
      command.Run(image)

      ' Save the image back to disk
      codecs.Save(image, destFileName, RasterImageFormat.Bmp, 8)

      ' Clean Up
      image.Dispose()
   End Sub

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

public void SizeCommandExample()
   {
      RasterCodecs codecs = new RasterCodecs();

      string srcFileName = Path.Combine(LEAD_VARS.ImagesDir, "Image1.cmp");
      string destFileName = Path.Combine(LEAD_VARS.ImagesDir,"SizeCommand.bmp");

      // Load the source image from disk
      RasterImage image = codecs.Load(srcFileName);
      SizeCommand command = new SizeCommand();
      command.Width = 128;
      command.Height = 128;
      command.Flags = RasterSizeFlags.Resample;
      command.Run(image);

      // Save the image back to disk
      codecs.Save(image, destFileName, RasterImageFormat.Bmp, 8);

      // Clean Up
      image.Dispose();
   }

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

public void SizeCommandExample(RasterImage image, Stream destStream)
{
   RasterCodecs codecs = new RasterCodecs();
   SizeCommand command = new SizeCommand();
   command.Width = 128;
   command.Height = 128;
   command.Flags = RasterSizeFlags.Resample;
   command.Run(image);

   // Save the image back to disk
   codecs.Save(image, destStream, RasterImageFormat.Bmp, 8);

   // Clean Up
   image.Dispose();
}

Public Sub SizeCommandExample(ByVal image As RasterImage, ByVal destStream As Stream)
   Dim codecs As RasterCodecs = New RasterCodecs()
   Dim command As SizeCommand = New SizeCommand()
   command.Width = 128
   command.Height = 128
   command.Flags = RasterSizeFlags.Resample
   command.Run(image)

   ' Save the image back to disk
   codecs.Save(image, destStream, RasterImageFormat.Bmp, 8)

   ' Clean Up
   image.Dispose()
End Sub