Public Function New( _
   ByVal minLength As Integer, _
   ByVal maxWidth As Integer, _
   ByVal minWallHeight As Integer, _
   ByVal maxWallPercent As Integer, _
   ByVal maxSideteethLength As Integer, _
   ByVal maxMidteethLength As Integer, _
   ByVal teethSpacing As Integer, _
   ByVal gaps As Integer, _
   ByVal variance As Integer, _
   ByVal autoFilter As Boolean _
)

Dim minLength As Integer
Dim maxWidth As Integer
Dim minWallHeight As Integer
Dim maxWallPercent As Integer
Dim maxSideteethLength As Integer
Dim maxMidteethLength As Integer
Dim teethSpacing As Integer
Dim gaps As Integer
Dim variance As Integer
Dim autoFilter As Boolean
 
Dim instance As New RakeRemoveCommand(minLength, maxWidth, minWallHeight, maxWallPercent, maxSideteethLength, maxMidteethLength, teethSpacing, gaps, variance, autoFilter)

public RakeRemoveCommand( 
   int minLength,
   int maxWidth,
   int minWallHeight,
   int maxWallPercent,
   int maxSideteethLength,
   int maxMidteethLength,
   int teethSpacing,
   int gaps,
   int variance,
   bool autoFilter
)

public:
RakeRemoveCommand( 
   int minLength,
   int maxWidth,
   int minWallHeight,
   int maxWallPercent,
   int maxSideteethLength,
   int maxMidteethLength,
   int teethSpacing,
   int gaps,
   int variance,
   bool autoFilter
)

Public WithEvents rakeRemoveCommand_S2 As RakeRemoveCommand
Public Sub RakeRemoveConstructorExample()
   Dim codecs As New RasterCodecs()
   codecs.ThrowExceptionsOnInvalidImages = True

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

   ' Prepare the command
   rakeRemoveCommand_S2 = New RakeRemoveCommand(50, 3, 10, 25, 60, 50, 5, 1, 1, False)
   rakeRemoveCommand_S2.Run(leadImage)

End Sub

Private Sub RakeRemoveCommand_RakeRemove_S2(ByVal sender As Object, ByVal e As RakeRemoveCommandEventArgs) Handles rakeRemoveCommand_S2.RakeRemove
   MessageBox.Show("Rake length is " + "( " + e.Length.ToString() + " )")

   e.Status = RemoveStatus.Remove
End Sub

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

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

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

         // Prepare the command
         RakeRemoveCommand command = new RakeRemoveCommand(50, 3, 10, 25, 60, 50, 5, 1, 1, false);
         command.RakeRemove += new EventHandler<RakeRemoveCommandEventArgs>(RakeRemoveEvent_S2);
         command.Run(image);

     }

     private void RakeRemoveEvent_S2(object sender, RakeRemoveCommandEventArgs e)
     {
         MessageBox.Show("Rake length is " + "( " + e.Length.ToString() + " )");
         e.Status = RemoveStatus.Remove;
     }

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