Public Function New( _
   ByVal flags As TissueEqualizeCommandFlags _
)

Dim flags As TissueEqualizeCommandFlags
 
Dim instance As New TissueEqualizeCommand(flags)

public TissueEqualizeCommand( 
   TissueEqualizeCommandFlags flags
)

public:
TissueEqualizeCommand( 
   TissueEqualizeCommandFlags flags
)

Public Sub TissueEqualizeConstructorExamples()
   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 TissueEqualizeCommand = New TissueEqualizeCommand(TissueEqualizeCommandFlags.UseIntensifyOption)
   'Apply 
   command.Flags = TissueEqualizeCommandFlags.UseIntensifyOption
   command.Run(leadImage)

End Sub

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

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

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

         // Prepare the command
         TissueEqualizeCommand command = new TissueEqualizeCommand(TissueEqualizeCommandFlags.UseIntensifyOption);
         //Apply 
         command.Run(image);

     }

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

public void TissueEqualizeConstructorExample(RasterImage image, Stream outStream)
{
   // Prepare the command
   TissueEqualizeCommand command = new TissueEqualizeCommand(TissueEqualizeCommandFlags.UseIntensifyOption);
   //Apply 
   command.Run(image);
   // Save result image
   RasterCodecs codecs = new RasterCodecs();
   codecs.Save(image, outStream, RasterImageFormat.Jpeg, 24);
   image.Dispose();
}

Public Sub TissueEqualizeConstructorExample(ByVal image As RasterImage, ByVal outStream As Stream)
   ' Prepare the command
   Dim command As TissueEqualizeCommand = New TissueEqualizeCommand(TissueEqualizeCommandFlags.UseIntensifyOption)
   'Apply 
   command.Run(image)
   ' Save result image
   Dim codecs As RasterCodecs = New RasterCodecs()
   codecs.Save(image, outStream, RasterImageFormat.Jpeg, 24)
   image.Dispose()
End Sub