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 SpatialExample()
Dim client As FiltersProcessingServiceClient = New FiltersProcessingServiceClient()
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 matrix As Integer() = New Integer(8) {}
matrix(0) = 0
matrix(1) = 1
matrix(2) = 0
matrix(3) = 0
matrix(4) = 0
matrix(5) = 0
matrix(6) = 0
matrix(7) = -1
matrix(8) = 0
Dim request As SpatialRequest = New SpatialRequest()
request.ConvertOptions = convertOptions
request.RegionData = Nothing
request.Matrix = matrix
request.Divisor = 1
request.Bias = 128
Dim response As CommandResponse = client.Spatial(request)
If Not response.Destination Is Nothing Then
If TypeOf response.Destination Is RawBinaryData Then
File.WriteAllBytes(Path.Combine(LEAD_VARS.ImagesDir, "Spatial.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
using Leadtools.Services;
using leadtools.services.datacontracts._2009._01;
using leadtools.services.raster.datacontracts._2009._01;
using leadtools.services.imageprocessing.datacontracts._2009._01;
public void SpatialExample()
{
FiltersProcessingServiceClient client = new FiltersProcessingServiceClient();
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;
int[] matrix = new int[9];
matrix[0] = 0;
matrix[1] = 1;
matrix[2] = 0;
matrix[3] = 0;
matrix[4] = 0;
matrix[5] = 0;
matrix[6] = 0;
matrix[7] = -1;
matrix[8] = 0;
SpatialRequest request = new SpatialRequest();
request.ConvertOptions = convertOptions;
request.RegionData = null;
request.Matrix = matrix;
request.Divisor = 1;
request.Bias = 128;
CommandResponse response = client.Spatial(request);
if (response.Destination != null)
{
if (response.Destination is RawBinaryData)
File.WriteAllBytes(Path.Combine(LEAD_VARS.ImagesDir,"Spatial.bmp"), (response.Destination as RawBinaryData).Data);
}
client.Close();
}
static class LEAD_VARS
{
public const string ImagesDir = @"C:\Users\Public\Documents\LEADTOOLS Images";
}