Public Class FreePlaneBendCommand 
   Inherits Leadtools.ImageProcessing.RasterCommand
   Implements IRasterCommand 

Dim instance As FreePlaneBendCommand

public class FreePlaneBendCommand : Leadtools.ImageProcessing.RasterCommand, IRasterCommand  

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

Public Sub FreePlaneBendCommandExample()
   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 FreePlaneBendCommand = New FreePlaneBendCommand
   Dim UserPoint() As LeadPoint
   ReDim UserPoint(3)

   Dim Curve() As Integer
   ReDim Curve(12)

   'Apply the filter
   UserPoint(0).X = 0
   UserPoint(0).Y = 0
   UserPoint(1).X = 3
   UserPoint(1).Y = 10
   UserPoint(2).X = 9
   UserPoint(2).Y = -10
   UserPoint(3).X = 12
   UserPoint(3).Y = 0

   EffectsUtilities.GetCurvePoints(Curve, UserPoint, CurvePointsType.Linear)
   command.Flags = FreePlaneBendCommandFlags.Color Or FreePlaneBendCommandFlags.Vertical
   command.Scale = 200
   command.FillColor = New RasterColor(255, 0, 0)
   command.Curve = Curve
   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 FreePlaneBendCommandExample()
   {
      // Load an image
      RasterCodecs codecs = new RasterCodecs();
      codecs.ThrowExceptionsOnInvalidImages = true;

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

      // Prepare the command
      FreePlaneBendCommand command = new FreePlaneBendCommand();
      LeadPoint[] UserPoint = new LeadPoint[4];
      int[] Curve = new int[13];

      //Apply the filter
      UserPoint[0].X = 0;
      UserPoint[0].Y = 0;
      UserPoint[1].X = 3;
      UserPoint[1].Y = 10;
      UserPoint[2].X = 9;
      UserPoint[2].Y = -10;
      UserPoint[3].X = 12;
      UserPoint[3].Y = 0; 

      EffectsUtilities.GetCurvePoints(Curve, UserPoint, CurvePointsType.Linear);
      for(int i = 0; i < Curve.Length; i++)
         Curve[i] /= 50;
      command.Flags = FreePlaneBendCommandFlags.Color | FreePlaneBendCommandFlags.Vertical;
      command.Scale = 200;
      command.FillColor = new RasterColor(255, 0, 0);
      command.Curve = Curve;
      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";
}