←Select platform

ShearCommand Class

Summary

Moves the corners of an image in the fashion of a parallelogram.

Syntax
C#
VB
Objective-C
C++
Java
public class ShearCommand : RasterCommand 
Public Class ShearCommand  
   Inherits RasterCommand 
@interface LTShearCommand : LTRasterCommand 
public class ShearCommand extends RasterCommand 
public ref class ShearCommand : public RasterCommand   

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:

Horizontal Shear

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

This example shears the image 15 degrees vertically, filling extra space with blue.

C#
VB
using Leadtools; 
using Leadtools.Codecs; 
using Leadtools.ImageProcessing; 
using LeadtoolsExamples.Common; 
 
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(); 
} 
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 
c#[Silverlight C# Example] 
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(); 
} 
vb[Silverlight VB Example] 
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

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

Leadtools Assembly