←Select platform

Crop Method

Summary

Crops the image, resulting in an image that is the size of the specified rectangle.

Syntax

C#
VB
C++
[FaultContractAttribute(System.Type)] 
[OperationContractAttribute(Action="Crop", 
   AsyncPattern=false, 
   IsOneWay=false, 
   IsInitiating=true, 
   IsTerminating=false)] 
public CommandResponse Crop( 
   CropRequest request 
) 
  
<FaultContractAttribute(DetailType=Leadtools.Services.Raster.FaultContracts.RasterFault,  
   Action="",  
   Name="",  
   Namespace="",  
   ProtectionLevel=ProtectionLevel.None,  
   HasProtectionLevel=False)> 
<OperationContractAttribute("Crop")> 
Function Crop( _ 
   ByVal request As Leadtools.Services.Imageprocessing.Datacontracts.CropRequest _ 
) As Leadtools.Services.Imageprocessing.Datacontracts.CommandResponse 
[FaultContractAttribute(DetailType=Leadtools.Services.Raster.FaultContracts.RasterFault,  
   Action="",  
   Name="",  
   Namespace="",  
   ProtectionLevel=ProtectionLevel.None,  
   HasProtectionLevel=false)] 
[OperationContractAttribute("Crop")] 
Leadtools.Services.Imageprocessing.Datacontracts.CommandResponse^ Crop(  
   Leadtools.Services.Imageprocessing.Datacontracts.CropRequest^ request 
)  

Parameters

request
A System.Runtime.Serialization.DataContractAttribute containing the data that will be used in this Crop operation.

Return Value

A System.Runtime.Serialization.DataContractAttribute containing the modified image resulting from the Crop operation.

Remarks

If a region is defined for the image, the region is also cropped if necessary.

Example

C#
VB
using Leadtools.Services; 
 
public void CropExample() 
{ 
   ImageProcessingServiceClient client = new ImageProcessingServiceClient(); 
 
   RawBinaryData sourceBinaryData = new RawBinaryData(); 
   sourceBinaryData.Data = File.ReadAllBytes(Path.Combine(LEAD_VARS.ImagesDir, "image1.cmp")); 
 
   RasterConvertOptions convertOptions = new RasterConvertOptions(); 
 
   convertOptions.Source = sourceBinaryData; 
   convertOptions.Destination = null; 
   convertOptions.Format = RasterImageFormat.Bmp; 
   convertOptions.FirstPage = 1; 
   convertOptions.LastPage = 1; 
   convertOptions.BitsPerPixel = 24; 
   convertOptions.QualityFactor = 2; 
 
   LeadRectangle recatangle = new LeadRectangle(); 
   recatangle.X = 100; 
   recatangle.Y = 100; 
   recatangle.Width = 200; 
   recatangle.Height = 200; 
 
   CropRequest request = new CropRequest(); 
 
   request.ConvertOptions = convertOptions; 
   request.RegionData = null; 
   request.Rectangle = recatangle; 
 
   CommandResponse response = client.Crop(request); 
   if (response.Destination != null) 
   { 
      if (response.Destination is RawBinaryData) 
         File.WriteAllBytes(Path.Combine(LEAD_VARS.ImagesDir, "Crop.bmp"), (response.Destination as RawBinaryData).Data); 
   } 
 
   client.Close(); 
} 
 
static class LEAD_VARS 
{ 
   public const string ImagesDir = @"C:\Users\Public\Documents\LEADTOOLS Images"; 
} 
Imports Leadtools.Services 
Imports Leadtools.Services.datacontracts._2009._01 
Imports Leadtools.Services.raster.datacontracts._2009._01 
Imports Leadtools.Services.ImageProcessing.datacontracts._2009._01 
 
Public Sub CropExample() 
   Dim client As ImageProcessingServiceClient = New ImageProcessingServiceClient() 
 
   Dim sourceBinaryData As RawBinaryData = New RawBinaryData() 
   sourceBinaryData.Data = File.ReadAllBytes(Path.Combine(LEAD_VARS.ImagesDir, "image1.cmp")) 
 
   Dim convertOptions As RasterConvertOptions = New RasterConvertOptions() 
 
   convertOptions.Source = sourceBinaryData 
   convertOptions.Destination = Nothing 
   convertOptions.Format = RasterImageFormat.Bmp 
   convertOptions.FirstPage = 1 
   convertOptions.LastPage = 1 
   convertOptions.BitsPerPixel = 24 
   convertOptions.QualityFactor = 2 
 
   Dim recatangle As LeadRectangle = New LeadRectangle() 
   recatangle.X = 100 
   recatangle.Y = 100 
   recatangle.Width = 200 
   recatangle.Height = 200 
 
   Dim request As CropRequest = New CropRequest() 
 
   request.ConvertOptions = convertOptions 
   request.RegionData = Nothing 
   request.Rectangle = recatangle 
 
   Dim response As CommandResponse = client.Crop(request) 
   If Not response.Destination Is Nothing Then 
      If TypeOf response.Destination Is RawBinaryData Then 
         File.WriteAllBytes(Path.Combine(LEAD_VARS.ImagesDir, "Crop.bmp"), (TryCast(response.Destination, RawBinaryData)).Data) 
      End If 
   End If 
 
   client.Close() 
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 19.0.2017.10.27
Products | Support | Contact Us | Copyright Notices
© 1991-2017 LEAD Technologies, Inc. All Rights Reserved.