←Select platform

LensFlareCommand Constructor(LeadPoint,int,LensFlareCommandType,RasterColor)

Summary

Initializes a new LensFlareCommand class object with explicit parameters.

Syntax
C#
VB
C++
  
Public Function New( _ 
   ByVal centerPoint As LeadPoint, _ 
   ByVal brightness As Integer, _ 
   ByVal type As LensFlareCommandType, _ 
   ByVal color As RasterColor _ 
) 
public: 
LensFlareCommand(  
   LeadPoint centerPoint, 
   int brightness, 
   LensFlareCommandType type, 
   RasterColor color 
) 

Parameters

centerPoint
Point around which the effect is centered.

brightness
The brightness of the flare. This value is divided internally by 100. This parameter affects the brightness of both the flare, and any lightened circles surrounding the flare. This parameter only accepts positive values.

type
Flag that indicates the lens type.

color
Specifies the color of the main flare.

Example

Run the LensFlareCommand on an image.

C#
VB
using Leadtools; 
using Leadtools.Codecs; 
using Leadtools.ImageProcessing.SpecialEffects; 
 
public void LensFlareConstructorExample() 
{ 
   // Load an image 
   RasterCodecs codecs = new RasterCodecs(); 
   codecs.ThrowExceptionsOnInvalidImages = true; 
 
   RasterImage image = codecs.Load(Path.Combine(LEAD_VARS.ImagesDir, "sample5.cmp")); 
 
   // Prepare the command 
   LensFlareCommand command = new LensFlareCommand(new LeadPoint(image.Width / 4, image.Height / 4), 100, LensFlareCommandType.Type1, new RasterColor(100, 150, 10)); 
   // Apply the lens flare effect to 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"; 
} 
Imports Leadtools 
Imports Leadtools.Codecs 
Imports Leadtools.ImageProcessing.SpecialEffects 
 
Public Sub LensFlareConstructorExample() 
   Dim codecs As New RasterCodecs() 
   codecs.ThrowExceptionsOnInvalidImages = True 
 
   Dim leadImage As RasterImage = codecs.Load(Path.Combine(LEAD_VARS.ImagesDir, "sample5.cmp")) 
 
   ' Prepare the command 
   Dim command As LensFlareCommand = New LensFlareCommand(New LeadPoint(CType((leadImage.Width \ 4), Integer), CType((leadImage.Height \ 4), Integer)), 100, LensFlareCommandType.Type1, New RasterColor(100, 150, 10)) 
   ' Apply the lens flare effect to 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 

Requirements

Target Platforms

Help Version 20.0.2019.9.19
Products | Support | Contact Us | Intellectual Property Notices
© 1991-2019 LEAD Technologies, Inc. All Rights Reserved.

Leadtools.ImageProcessing.SpecialEffects Assembly