LEADTOOLS (Leadtools assembly)

ShearCommand Class

Show in webframe
Example 







Members 
Moves the corners of an image in the fashion of a parallelogram.
Object Model
Syntax
public class ShearCommand : RasterCommand, IRasterCommand  
'Declaration
 
Public Class ShearCommand 
   Inherits RasterCommand
   Implements IRasterCommand 
'Usage
 
Dim instance As ShearCommand
public sealed class ShearCommand : IRasterCommand  
@interface LTShearCommand : LTRasterCommand
public class ShearCommand extends RasterCommand
function Leadtools.ImageProcessing.ShearCommand()
public ref class ShearCommand : public RasterCommand, IRasterCommand  
Remarks

You specify an angle of slant, horizontal or vertical shear, and the fill color for the created space. The following is a horizontal example:

The angle is expressed in hundredths of degrees, with a limit of 4500 (45 degrees).

This command supports signed/unsigned data images.

For more information, refer to Introduction to Image Processing With LEADTOOLS.

Example
Copy Code  
Imports Leadtools
  Imports Leadtools.Codecs
  Imports Leadtools.ImageProcessing

  Public Sub ShearCommandExample()
   Dim codecs As RasterCodecs = New RasterCodecs()

   Dim srcFileName As String = Path.Combine(LEAD_VARS.ImagesDir, "Image1.cmp")
   Dim destFileName As String = Path.Combine(LEAD_VARS.ImagesDir, "ShearCommand.bmp")

   ' Load the source image from disk
   Dim image As RasterImage = codecs.Load(srcFileName)

   ' Shear the image 15 degrees vertically
   Dim command As ShearCommand = New ShearCommand()
   command.Angle = -15 * 100
   command.FillColor = New RasterColor(255, 255, 255)
   command.Horizontal = False
   command.Run(image)

   ' Save the image back to disk
   codecs.Save(image, destFileName, RasterImageFormat.Bmp, 32)

   ' Clean Up
   image.Dispose()
End Sub

  Public NotInheritable Class LEAD_VARS
  Public Const ImagesDir As String = "C:\Users\Public\Documents\LEADTOOLS Images"
  End Class
using Leadtools;
using Leadtools.Codecs;
using Leadtools.ImageProcessing;

      
public void ShearCommandExample()
{
   RasterCodecs codecs = new RasterCodecs();
   string srcFileName = Path.Combine(ImagesPath.Path, "Image1.cmp");
   string destFileName = Path.Combine(ImagesPath.Path, "ShearCommand.bmp");

   // Load the source image from disk
   RasterImage image = codecs.Load(srcFileName);

   // Shear the image 15 degrees vertically
   ShearCommand command = new ShearCommand();
   command.Angle = -15 * 100;
   command.FillColor = new RasterColor(255, 255, 255);
   command.Horizontal = false;
   command.Run(image);

   // Save the image back to disk
   codecs.Save(image, destFileName, RasterImageFormat.Bmp, 32);

   // Clean Up
   image.Dispose();
   codecs.Dispose();
}
RasterCommandExamples.prototype.ShearCommandExample = function () {
    Tools.SetLicense();
    with (Leadtools) {
        with (Leadtools.Codecs) {
            with (Leadtools.ImageProcessing) {

                var codecs = new RasterCodecs();

                var srcFileName = "Assets\\Image1.cmp";
                var destFileName = "ShearCommand.bmp";
                var image;
                // Load the source image from disk
                return Tools.AppInstallFolder().getFileAsync(srcFileName).then(function (loadFile) {
                    return codecs.loadAsync(LeadStreamFactory.create(loadFile))
                })
                   .then(function (img) {
                       image = img;

                       // Shear the image 15 degrees vertically
                       var command = new ShearCommand();
                       command.angle = -15 * 100;
                       command.fillColor = RasterColorHelper.create(255, 255, 255);
                       command.horizontal = false;
                       command.run(image);

                       // Save the image back to disk
                       return Tools.AppLocalFolder().createFileAsync(destFileName)
                   })
                   .then(function (saveFile) {
                       return codecs.saveAsync(image, LeadStreamFactory.create(saveFile), RasterImageFormat.bmp, 32)
                   })
                   .then(function () {
                       // Clean Up
                       image.close();
                   });
            }
        }
    }
}
using Leadtools;
using Leadtools.Codecs;
using Leadtools.ImageProcessing;

      
public async Task ShearCommandExample()
{
   RasterCodecs codecs = new RasterCodecs();
   string srcFileName = @"Assets\Image1.cmp";
   string destFileName = @"ShearCommand.bmp";

   // Load the source image from disk
   StorageFile loadFile = await Tools.AppInstallFolder.GetFileAsync(srcFileName);
   RasterImage image = await codecs.LoadAsync(LeadStreamFactory.Create(loadFile));

   // Shear the image 15 degrees vertically
   ShearCommand command = new ShearCommand();
   command.Angle = -15 * 100;
   command.FillColor = RasterColorHelper.Create(255, 255, 255);
   command.Horizontal = false;
   command.Run(image);

   // Save the image back to disk
   StorageFile saveFile = await Tools.AppLocalFolder.CreateFileAsync(destFileName);
   await codecs.SaveAsync(image, LeadStreamFactory.Create(saveFile), RasterImageFormat.Bmp, 32);

   // Clean Up
   image.Dispose();
}
using Leadtools;
using Leadtools.Codecs;
using Leadtools.Examples;
using Leadtools.ImageProcessing;
using Leadtools.Windows.Media;

public void ShearCommandExample(RasterImage image, Stream destStream)
{
   RasterCodecs codecs = new RasterCodecs();
   // Shear the image 15 degrees vertically
   ShearCommand command = new ShearCommand();
   command.Angle = -15 * 100;
   command.FillColor = new RasterColor(255, 255, 255);
   command.Horizontal = false;
   command.Run(image);

   // Save the image back to disk
   codecs.Save(image, destStream, RasterImageFormat.Bmp, 32);

   // Clean Up
   image.Dispose();
}
Imports Leadtools
Imports Leadtools.Codecs
Imports Leadtools.ImageProcessing
Imports Leadtools.Windows.Media

Public Sub ShearCommandExample(ByVal image As RasterImage, ByVal destStream As Stream)
   Dim codecs As RasterCodecs = New RasterCodecs()
   ' Shear the image 15 degrees vertically
   Dim command As ShearCommand = New ShearCommand()
   command.Angle = -15 * 100
   command.FillColor = New RasterColor(255, 255, 255)
   command.Horizontal = False
   command.Run(image)

   ' Save the image back to disk
   codecs.Save(image, destStream, RasterImageFormat.Bmp, 32)

   ' Clean Up
   image.Dispose()
End Sub
Requirements

Target Platforms

See Also

Reference

ShearCommand Members
Leadtools.ImageProcessing Namespace

 

 


Products | Support | Contact Us | Copyright Notices

© 2006-2014 All Rights Reserved. LEAD Technologies, Inc.