Public Function New( _
   ByVal displacementMapImage As RasterImage, _
   ByVal horizontalFactor As Integer, _
   ByVal verticalFactor As Integer, _
   ByVal fillColor As RasterColor, _
   ByVal flags As DisplacementCommandFlags _
)

Dim displacementMapImage As RasterImage
Dim horizontalFactor As Integer
Dim verticalFactor As Integer
Dim fillColor As RasterColor
Dim flags As DisplacementCommandFlags
 
Dim instance As New DisplacementCommand(displacementMapImage, horizontalFactor, verticalFactor, fillColor, flags)

public DisplacementCommand( 
   RasterImage displacementMapImage,
   int horizontalFactor,
   int verticalFactor,
   RasterColor fillColor,
   DisplacementCommandFlags flags
)

public:
DisplacementCommand( 
   RasterImage^ displacementMapImage,
   int horizontalFactor,
   int verticalFactor,
   RasterColor fillColor,
   DisplacementCommandFlags flags
)

Public Sub DisplacementConstructorExample()
   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 fillColor As RasterColor = New RasterColor(0, 0, 0)
   Dim displaceImage As RasterImage = codecs.Load(Path.Combine(LEAD_VARS.ImagesDir, "cannon.jpg"))
   Dim command As DisplacementCommand = New DisplacementCommand(displaceImage, 17, 24, fillColor, DisplacementCommandFlags.NoChange Or DisplacementCommandFlags.StretchToFit)
   command.Run(leadImage)
   codecs.Save(leadImage, Path.Combine(LEAD_VARS.ImagesDir, "Result.jpg"), RasterImageFormat.Jpeg, 24)

End Sub

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

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

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

      // Prepare the command
      RasterColor fillColor = new RasterColor(0, 0, 0);
      RasterImage displaceImage = codecs.Load(Path.Combine(LEAD_VARS.ImagesDir, "cannon.jpg"));

      DisplacementCommand command = new DisplacementCommand(displaceImage, 17, 24, fillColor, DisplacementCommandFlags.NoChange | DisplacementCommandFlags.StretchToFit);
      command.Run(image);
      codecs.Save(image, Path.Combine(LEAD_VARS.ImagesDir, "Result.jpg"), RasterImageFormat.Jpeg, 24);

   }

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

public void DisplacementConstructorExample(RasterImage image, RasterImage displaceImage, Stream outStream)
{
   // Prepare the command
   RasterColor fillColor = new RasterColor(0, 0, 0);
   DisplacementCommand command = new DisplacementCommand(displaceImage, 17, 24, fillColor, DisplacementCommandFlags.NoChange | DisplacementCommandFlags.StretchToFit);
   command.Run(image);
   // Save result image
   RasterCodecs codecs = new RasterCodecs();
   codecs.Save(image, outStream, RasterImageFormat.Jpeg, 24);
   image.Dispose();
   displaceImage.Dispose();
}

Public Sub DisplacementConstructorExample(ByVal image As RasterImage, ByVal displaceImage As RasterImage, ByVal outStream As Stream)
   ' Prepare the command
   Dim fillColor As RasterColor = New RasterColor(0, 0, 0)
   Dim command As DisplacementCommand = New DisplacementCommand(displaceImage, 17, 24, fillColor, DisplacementCommandFlags.NoChange Or DisplacementCommandFlags.StretchToFit)
   command.Run(image)
   ' Save result image
   Dim codecs As RasterCodecs = New RasterCodecs()
   codecs.Save(image, outStream, RasterImageFormat.Jpeg, 24)
   image.Dispose()
   displaceImage.Dispose()
End Sub