Public Function New( _
   ByVal seed As Integer, _
   ByVal frequency As Integer, _
   ByVal density As Integer, _
   ByVal opacity As Integer, _
   ByVal backColor As RasterColor, _
   ByVal cloudsColor As RasterColor, _
   ByVal type As CloudsCommandType _
)

Visual Basic (Usage)	Copy Code
Dim seed As Integer Dim frequency As Integer Dim density As Integer Dim opacity As Integer Dim backColor As RasterColor Dim cloudsColor As RasterColor Dim type As CloudsCommandType   Dim instance As CloudsCommand(seed, frequency, density, opacity, backColor, cloudsColor, type)

public CloudsCommand( 
   int seed,
   int frequency,
   int density,
   int opacity,
   RasterColor backColor,
   RasterColor cloudsColor,
   CloudsCommandType type
)

public:
CloudsCommand( 
   int seed,
   int frequency,
   int density,
   int opacity,
   RasterColor backColor,
   RasterColor cloudsColor,
   CloudsCommandType type
)

Parameters

seed

Seed value that controls the cloud creation process. Possible values are 0 or greater.

frequency

Value that controls the number of clouds inside the image. Possible values are 0 or greater.

density

Value that indicates the detail in the clouds. Possible values are 0 or greater. Use larger values to increase the detail in the clouds, smaller values for blurring.

opacity

Value that indicates the transparency, in percent, between the cloud's image and the original image. Valid values range from 0 to 100. This is used if the CloudsCommandType.Opacity or CloudsCommandType.Difference flag is set. A value of 0 indicates that no clouds are being used while the value of 100 represents a mix of clouds and image.

backColor

Represents the fill color for the areas outside the cloud.

cloudsColor

Represents the fill color for the cloud.

type

Enumeration that specifies how to apply the clouds effect.

Run the CloudsCommand on an image.

Visual Basic

Copy Code

Public Sub CloudsConstructorExample()    RasterCodecs.Startup()    Dim codecs As New RasterCodecs()    codecs.ThrowExceptionsOnInvalidImages = True    Dim leadImage As RasterImage = codecs.Load(LeadtoolsExamples.Common.ImagesPath.Path + "Master.jpg")    ' Prepare the command    Dim command As CloudsCommand = New CloudsCommand(1000, 4, 10, 10, New RasterColor(255, 255, 255), New RasterColor(0, 0, 0), CloudsCommandType.Difference)    command.Run(leadImage)    codecs.Save(leadImage, LeadtoolsExamples.Common.ImagesPath.Path + "Result.jpg", RasterImageFormat.Jpeg, 24)    RasterCodecs.Shutdown() End Sub

C#

Copy Code

public void CloudsConstructorExample()  {     // Load an image     RasterCodecs.Startup();     RasterCodecs codecs = new RasterCodecs();     codecs.ThrowExceptionsOnInvalidImages = true;       RasterImage image = codecs.Load(LeadtoolsExamples.Common.ImagesPath.Path + "Master.jpg");       // Prepare the command     CloudsCommand command  = new CloudsCommand(1000, 4, 10, 10, new RasterColor(255,255,255), new RasterColor(0, 0, 0), CloudsCommandType.Difference);     command.Run(image);     codecs.Save(image, LeadtoolsExamples.Common.ImagesPath.Path + "Result.jpg", RasterImageFormat.Jpeg, 24);       RasterCodecs.Shutdown();  }

Target Platforms: Microsoft .NET Framework 2.0, Windows 98, Windows NT 4.0, Windows Millennium Edition, Windows 2000, Windows XP Home Edition, Windows XP Professional, Windows Server 2003 family

Reference