Public Class FillCommand 
   Inherits RasterCommand
   Implements IRasterCommand 

Dim instance As FillCommand

public class FillCommand : RasterCommand, IRasterCommand  

public ref class FillCommand : public RasterCommand, IRasterCommand  

Public Sub FillCommandExample()
      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, "FillCommand.bmp")

      ' Load the source image from disk
      Dim image As RasterImage = codecs.Load(srcFileName)

      ' Fill the image with blue color
      Dim command As FillCommand = New FillCommand()
      command.Color = New RasterColor(0, 0, 255)
      command.Run(image)

      ' Save it to disk
      codecs.Save(image, destFileName, RasterImageFormat.Bmp, 24)

      ' 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 FillCommandExample()
   {
      RasterCodecs codecs = new RasterCodecs();

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

      // Load the source image from disk
      RasterImage image = codecs.Load(srcFileName);

      // Fill the image with blue color
      FillCommand command = new FillCommand();
      command.Color = new RasterColor(0, 0, 255);
      command.Run(image);

      // Save it to disk
      codecs.Save(image, destFileName, RasterImageFormat.Bmp, 24);

      // Clean Up
      image.Dispose();
   }

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

public void FillCommandExample(RasterImage image, Stream destStream)
{
   RasterCodecs codecs = new RasterCodecs();
   // Fill the image with blue color
   FillCommand command = new FillCommand();
   command.Color = new RasterColor(0, 0, 255);
   command.Run(image);

   // Save it to disk
   codecs.Save(image, destStream, RasterImageFormat.Bmp, 24);

   // Clean Up
   image.Dispose();
}

Public Sub FillCommandExample(ByVal image As RasterImage, ByVal destStream As Stream)
   Dim codecs As RasterCodecs = New RasterCodecs()
   ' Fill the image with blue color
   Dim command As FillCommand = New FillCommand()
   command.Color = New RasterColor(0, 0, 255)
   command.Run(image)

   ' Save it to disk
   codecs.Save(image, destStream, RasterImageFormat.Bmp, 24)

   ' Clean Up
   image.Dispose()
End Sub