Public Function New( _
   ByVal sourceImage As RasterImage, _
   ByVal sourcePoint As LeadPoint, _
   ByVal destinationRectangle As LeadRect, _
   ByVal opacity As Integer, _
   ByVal maskImage As RasterImage, _
   ByVal underlayImage As RasterImage, _
   ByVal underlayOffset As LeadPoint _
)

Dim sourceImage As RasterImage
Dim sourcePoint As LeadPoint
Dim destinationRectangle As LeadRect
Dim opacity As Integer
Dim maskImage As RasterImage
Dim underlayImage As RasterImage
Dim underlayOffset As LeadPoint
 
Dim instance As New TextureAlphaBlendCommand(sourceImage, sourcePoint, destinationRectangle, opacity, maskImage, underlayImage, underlayOffset)

public TextureAlphaBlendCommand( 
   RasterImage sourceImage,
   LeadPoint sourcePoint,
   LeadRect destinationRectangle,
   int opacity,
   RasterImage maskImage,
   RasterImage underlayImage,
   LeadPoint underlayOffset
)

public:
TextureAlphaBlendCommand( 
   RasterImage^ sourceImage,
   LeadPoint sourcePoint,
   LeadRect destinationRectangle,
   int opacity,
   RasterImage^ maskImage,
   RasterImage^ underlayImage,
   LeadPoint underlayOffset
)

Public Sub TextureAlphaBlendConstructorExample()
   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 srcImage As RasterImage = codecs.Load(Path.Combine(LEAD_VARS.ImagesDir, "ImageProcessingDemo\image3.cmp"), 4, CodecsLoadByteOrder.Bgr, 1, 1)
   'Load the fade mask image.
   Dim maskImage As RasterImage = codecs.Load(Path.Combine(LEAD_VARS.ImagesDir, "ImageProcessingDemo\FadeMask.bmp"), 4, CodecsLoadByteOrder.Bgr, 1, 1)
   Dim underlayImage As RasterImage = codecs.Load(Path.Combine(LEAD_VARS.ImagesDir, "cannon.jpg"), 4, CodecsLoadByteOrder.Bgr, 1, 1)

   Dim rect As LeadRect = New LeadRect(leadImage.Width \ 2 - maskImage.Width \ 2, leadImage.Height \ 2 - maskImage.Height \ 2, maskImage.Width, maskImage.Height)

   Dim command As TextureAlphaBlendCommand = New TextureAlphaBlendCommand(srcImage, New LeadPoint(0, 0), rect, 100, maskImage, underlayImage, New LeadPoint(150, 10))
   ' Combine ImageSource with the affected image, with MaskImage and a 100 opacity.
   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 TextureAlphaBlendConstructorExample()
   {
      // Load an image
      RasterCodecs codecs = new RasterCodecs();
      codecs.ThrowExceptionsOnInvalidImages = true;

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

      // Prepare the command
      RasterImage srcImage = codecs.Load(Path.Combine(LEAD_VARS.ImagesDir, @"ImageProcessingDemo\Image3.cmp"), 4, CodecsLoadByteOrder.Bgr, 1, 1);

      //Load the fade mask image.
      RasterImage maskImage = codecs.Load(Path.Combine(LEAD_VARS.ImagesDir, @"ImageProcessingDemo\FadeMask.bmp"), 4, CodecsLoadByteOrder.Bgr, 1, 1);

      RasterImage underlayImage = codecs.Load(Path.Combine(LEAD_VARS.ImagesDir, "cannon.jpg"), 4, CodecsLoadByteOrder.Bgr, 1, 1);

      LeadRect rect = new LeadRect(image.Width / 2 - maskImage.Width / 2, image.Height / 2  - maskImage.Height / 2, maskImage.Width, maskImage.Height);

      TextureAlphaBlendCommand command = new TextureAlphaBlendCommand(srcImage, new LeadPoint(0, 0), rect, 100, maskImage, underlayImage, new LeadPoint(150, 10));

      // Combine ImageSource with the affected image, with MaskImage and a 100 opacity.
      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";
}