Public Class ColorCountCommand 
   Inherits Leadtools.ImageProcessing.RasterCommand
   Implements IRasterCommand 

Dim instance As ColorCountCommand

public class ColorCountCommand : Leadtools.ImageProcessing.RasterCommand, IRasterCommand  

public ref class ColorCountCommand : public Leadtools.ImageProcessing.RasterCommand, IRasterCommand  

Public Sub ColorCountCommandExample()
   Dim codecs As New RasterCodecs()
   codecs.ThrowExceptionsOnInvalidImages = True

   Dim leadImage As RasterImage = codecs.Load(Path.Combine(LEAD_VARS.ImagesDir, "Master.jpg"))

   ' Prepare the command
   Dim command As ColorCountCommand = New ColorCountCommand
   Dim colorCount As Integer
   'Get the number of colors in the image.

   command.Run(leadImage)
   colorCount = command.ColorCount
   MessageBox.Show("The image has " + colorCount.ToString() + " colors", "ColorCountCommand Results", MessageBoxButtons.OK)

End Sub

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

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

      RasterImage image = codecs.Load(Path.Combine(LEAD_VARS.ImagesDir, "Master.jpg"));

      // Prepare the command
      ColorCountCommand command = new ColorCountCommand();
      int colorCount;
      //Get the number of colors in the image.
      command.Run(image);
      colorCount = command.ColorCount;
      MessageBox.Show("The image has " + colorCount.ToString() + " colors","ColorCountCommand Results",MessageBoxButtons.OK);

   }

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

public void ColorCountCommandExample(RasterImage image)
{
   // Prepare the command
   ColorCountCommand command = new ColorCountCommand();
   int colorCount;
   //Get the number of colors in the image.
   command.Run(image);
   colorCount = command.ColorCount;
   Debug.WriteLine("The image has " + colorCount.ToString() + " colors","ColorCountCommand Results", MessageBoxButton.OK);
}

Public Sub ColorCountCommandExample(ByVal image As RasterImage)
   ' Prepare the command
   Dim command As ColorCountCommand = New ColorCountCommand()
   Dim colorCount As Integer
   'Get the number of colors in the image.
   command.Run(image)
   colorCount = command.ColorCount
   Debug.WriteLine("The image has " & colorCount.ToString() & " colors","ColorCountCommand Results", MessageBoxButton.OK)
End Sub