Public Function New( _
   ByVal region As RasterRegion, _
   ByVal length As Integer _
)

Dim region As RasterRegion
Dim length As Integer
 
Dim instance As New RakeRemoveCommandEventArgs(region, length)

public RakeRemoveCommandEventArgs( 
   RasterRegion region,
   int length
)

public:
RakeRemoveCommandEventArgs( 
   RasterRegion^ region,
   int length
)

Public WithEvents lineRemoveCommand_S4 As LineRemoveCommand
Public Sub LineRemoveCommandEventArgsExample()
   Dim codecs As New RasterCodecs()
   codecs.ThrowExceptionsOnInvalidImages = True

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

   ' Prepare the command
   lineRemoveCommand_S4 = New LineRemoveCommand(LineRemoveCommandFlags.UseGap Or LineRemoveCommandFlags.CallBackRegion, 200, 5, 7, 10, 2, 2, LineRemoveCommandType.Horizontal)
   lineRemoveCommand_S4.Run(leadImage)

End Sub

Private Sub LineRemoveCommand_LineRemove_S4(ByVal sender As Object, ByVal e As LineRemoveCommandEventArgs) Handles lineRemoveCommand_S4.LineRemove
   Dim ee As LineRemoveCommandEventArgs = New LineRemoveCommandEventArgs(e.Image, e.Region, e.StartRow, e.StartColumn, e.Length)
   e.Status = RemoveStatus.Remove
   If Not (e.Region Is Nothing) Then
      e.Image.SetRegion(Nothing, e.Region, RasterRegionCombineMode.AndNotRegion)
   End If
End Sub

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

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

      RasterImage image = codecs.Load(Path.Combine(LEAD_VARS.ImagesDir, "Clean.tif"));

      // Prepare the command
      LineRemoveCommand command = new LineRemoveCommand(LineRemoveCommandFlags.UseGap | LineRemoveCommandFlags.CallBackRegion, 200, 5, 7, 10, 2, 2, LineRemoveCommandType.Horizontal);
      command.LineRemove += new EventHandler<LineRemoveCommandEventArgs>(LineRemoveEvent_S4);
      command.Run(image);

   }

   private void LineRemoveEvent_S4(object sender, LineRemoveCommandEventArgs e)
   {
      LineRemoveCommandEventArgs ee = new LineRemoveCommandEventArgs(e.Image, e.Region, e.StartRow, e.StartColumn, e.Length);
      e.Status= RemoveStatus.Remove;
      if(e.Region != null)
         e.Image.SetRegion(null, e.Region, RasterRegionCombineMode.AndNotRegion);
   }

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

public void LineRemoveCommandEventArgsExample(RasterImage image, Stream outStream)
{
   // Prepare the command
   LineRemoveCommand command = new LineRemoveCommand(LineRemoveCommandFlags.UseGap | LineRemoveCommandFlags.CallBackRegion, 200, 5, 7, 10, 2, 2, LineRemoveCommandType.Horizontal);
   command.LineRemove += new EventHandler<LineRemoveCommandEventArgs>(LineRemoveEvent_S4);
   command.Run(image);
   // Save result image
   RasterCodecs codecs = new RasterCodecs();
   codecs.Save(image, outStream, RasterImageFormat.CcittGroup4, 1);
   image.Dispose();
}

private void LineRemoveEvent_S4(object sender, LineRemoveCommandEventArgs e)
{
    LineRemoveCommandEventArgs ee = new LineRemoveCommandEventArgs(e.Image, null, e.StartRow, e.StartColumn, e.Length);
    e.Status = RemoveStatus.Remove;
}

Public Sub LineRemoveCommandEventArgsExample(ByVal image As RasterImage, ByVal outStream As Stream)
   ' Prepare the command
   Dim command As LineRemoveCommand = New LineRemoveCommand(LineRemoveCommandFlags.UseGap Or LineRemoveCommandFlags.CallBackRegion, 200, 5, 7, 10, 2, 2, LineRemoveCommandType.Horizontal)
   AddHandler command.LineRemove, AddressOf LineRemoveEvent_S4
   command.Run(image)
   ' Save result image
   Dim codecs As RasterCodecs = New RasterCodecs()
   codecs.Save(image, outStream, RasterImageFormat.CcittGroup4, 1)
   image.Dispose()
End Sub

Private Sub LineRemoveEvent_S4(ByVal sender As Object, ByVal e As LineRemoveCommandEventArgs)
    Dim ee As LineRemoveCommandEventArgs = New LineRemoveCommandEventArgs(e.Image, Nothing, e.StartRow, e.StartColumn, e.Length)
    e.Status = RemoveStatus.Remove
End Sub