Public Class MotionBlurCommand 
   Inherits Leadtools.ImageProcessing.RasterCommand
   Implements IRasterCommand 

Dim instance As MotionBlurCommand

public class MotionBlurCommand : Leadtools.ImageProcessing.RasterCommand, IRasterCommand  

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

Public Sub MotionBlurCommandExample()
   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 MotionBlurCommand = New MotionBlurCommand
   command.Dimension = 20
   command.Angle = 4500
   command.UniDirection = False
   ' blur the image.
   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 MotionBlurCommandExample()
   {
      // Load an image
      RasterCodecs codecs = new RasterCodecs();
      codecs.ThrowExceptionsOnInvalidImages = true;

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

      // Prepare the command
      MotionBlurCommand command = new MotionBlurCommand();
      command.Dimension    = 20;
      command.Angle        = 4500;
      command.UniDirection = false;
      //blur the image.
      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";
}