ColorHalftoneCommand Class

Shows the effect of using an enlarged halftone screen on each image channel. The filter divides the image into rectangles and replaces each rectangle with circles. Each channel has a separate grid of circles, and has its own angle setting. The size of each circle is proportional to the brightness of the rectangle that it is replacing. This method is available in the Document/Medical toolkits.

Object Model

Syntax

public class ColorHalftoneCommand : Leadtools.ImageProcessing.RasterCommand, Leadtools.ImageProcessing.IRasterCommand

public sealed class ColorHalftoneCommand : Leadtools.ImageProcessing.IRasterCommand

function Leadtools.ImageProcessing.Effects.ColorHalftoneCommand()

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

'Declaration
 
Public Class ColorHalftoneCommand 
   Inherits Leadtools.ImageProcessing.RasterCommand
   Implements Leadtools.ImageProcessing.IRasterCommand

'Usage
 
Dim instance As ColorHalftoneCommand

Remarks

This method supports 12 and 16-bit grayscale and 48 and 64-bit color images. Support for 12 and 16-bit grayscale and 48 and 64-bit color images is available only in the Document/Medical toolkits.
If the image has a region, this method works only on the region. If the image does not have a region, this method works on the entire image.
This method does not support signed data images.
This command does not support 32-bit grayscale images.

Example

Public Sub ColorHalftoneCommandExample()
   Dim codecs As New RasterCodecs()
   codecs.ThrowExceptionsOnInvalidImages = True

   Dim leadImage As RasterImage = codecs.Load(Path.Combine(LEAD_VARS.ImagesDir, "ImageProcessingDemo\Beauty16.jpg"), 16, CodecsLoadByteOrder.BgrOrGray, 1, 1)

   ' Prepare the command
   Dim command As New ColorHalftoneCommand
   command.MaximumRadius = 15
   command.CyanAngle = 10800
   command.MagentaAngle = 16200
   command.YellowAngle = 9000
   command.BlackAngle = 4500
   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 ColorHalftoneCommandExample()
   {
      // Load an image
      RasterCodecs codecs = new RasterCodecs();
      codecs.ThrowExceptionsOnInvalidImages = true;

      RasterImage image = codecs.Load(Path.Combine(LEAD_VARS.ImagesDir, @"ImageProcessingDemo\Beauty16.jpg"),16,CodecsLoadByteOrder.BgrOrGray,1,1);


      // Prepare the command
      ColorHalftoneCommand command  = new ColorHalftoneCommand();
      command.MaximumRadius = 15;
      command.CyanAngle = 10800;
      command.MagentaAngle = 16200;
      command.YellowAngle = 9000;
      command.BlackAngle = 4500;
      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";
}

[TestMethod]
public async Task ColorHalftoneCommandExample()
{
   // Load an image
   RasterCodecs codecs = new RasterCodecs();
   codecs.ThrowExceptionsOnInvalidImages = true;
   string srcFileName = @"Assets\Beauty16.jpg";
   StorageFile loadFile = await Tools.AppInstallFolder.GetFileAsync(srcFileName);
   RasterImage image = await codecs.LoadAsync(LeadStreamFactory.Create(loadFile), 16, CodecsLoadByteOrder.BgrOrGray, 1, 1);

   // Prepare the command
   ColorHalftoneCommand command  = new ColorHalftoneCommand();
   command.MaximumRadius = 15;
   command.CyanAngle = 10800;
   command.MagentaAngle = 16200;
   command.YellowAngle = 9000;
   command.BlackAngle = 4500;
   command.Run(image);
   //Save as BMP
   string destFileName = @"result.bmp";
   StorageFile saveFile = await Tools.AppLocalFolder.CreateFileAsync(destFileName);
   await codecs.SaveAsync(image, LeadStreamFactory.Create(saveFile), RasterImageFormat.Bmp, 24);

}

public void ColorHalftoneCommandExample(RasterImage image, Stream outStream)
{
   // Prepare the command
   ColorHalftoneCommand command = new ColorHalftoneCommand();
   command.MaximumRadius = 15;
   command.CyanAngle = 10800;
   command.MagentaAngle = 16200;
   command.YellowAngle = 9000;
   command.BlackAngle = 4500;
   command.Run(image);
   // Save result image
   RasterCodecs codecs = new RasterCodecs();
   codecs.Save(image, outStream, RasterImageFormat.Jpeg, 24);
   image.Dispose();
}

Public Sub ColorHalftoneCommandExample(ByVal image As RasterImage, ByVal outStream As Stream)
   ' Prepare the command
   Dim command As ColorHalftoneCommand = New ColorHalftoneCommand()
   command.MaximumRadius = 15
   command.CyanAngle = 10800
   command.MagentaAngle = 16200
   command.YellowAngle = 9000
   command.BlackAngle = 4500
   command.Run(image)
   ' Save result image
   Dim codecs As RasterCodecs = New RasterCodecs()
   codecs.Save(image, outStream, RasterImageFormat.Jpeg, 24)
   image.Dispose()
End Sub

Requirements

Target Platforms: Windows 7, Windows Vista SP1 or later, Windows XP SP3, Windows Server 2008 (Server Core not supported), Windows Server 2008 R2 (Server Core supported with SP1 or later), Windows Server 2003 SP2

Reference