FileBinaryData Class
Summary
Loads a file from or saves a file to a disk.
Syntax
[DataContractAttribute(Namespace="http://Leadtools.Services.DataContracts/2009/01", Name="FileBinaryData")]
public class FileBinaryData : BinaryData
Example
This example will convert a TIF file in the source folder to a CMP file in the destination folder.
using Leadtools.Services;
using Leadtools.Services.Raster.ServiceContracts;
using Leadtools.Services.Raster.ServiceImplementations;
public void FileBinaryDataExample()
{
RasterServiceClient client = new RasterServiceClient();
FileBinaryData sourceBinaryData = new FileBinaryData();
sourceBinaryData.FileName = Path.Combine(LEAD_VARS.ImagesDir, "clean.tif");
FileBinaryData destinationBinaryData = new FileBinaryData();
destinationBinaryData.FileName = Path.Combine(LEAD_VARS.ImagesDir, "clean.cmp");
RasterConvertOptions convertOptions = new RasterConvertOptions();
convertOptions.Source = sourceBinaryData;
convertOptions.Destination = destinationBinaryData;
convertOptions.Format = RasterImageFormat.Cmp;
convertOptions.FirstPage = 1;
convertOptions.LastPage = 1;
convertOptions.BitsPerPixel = 24;
convertOptions.QualityFactor = 2;
ConvertRequest request = new ConvertRequest();
request.ConvertOptions = convertOptions;
client.Convert(request);
client.Close();
}
static class LEAD_VARS
{
public const string ImagesDir = @"C:\Users\Public\Documents\LEADTOOLS Images";
}
Imports Leadtools.Services
Imports Leadtools.Services.Raster.ServiceContracts
Imports Leadtools.Services.Raster.ServiceImplementations
Public Sub FileBinaryDataExample()
Dim client As RasterServiceClient = New RasterServiceClient()
Dim sourceBinaryData As FileBinaryData = New FileBinaryData()
sourceBinaryData.FileName = Path.Combine(LEAD_VARS.ImagesDir, "clean.tif")
Dim destinationBinaryData As FileBinaryData = New FileBinaryData()
destinationBinaryData.FileName = Path.Combine(LEAD_VARS.ImagesDir, "clean.cmp")
Dim convertOptions As RasterConvertOptions = New RasterConvertOptions()
convertOptions.Source = sourceBinaryData
convertOptions.Destination = destinationBinaryData
convertOptions.Format = RasterImageFormat.Cmp
convertOptions.FirstPage = 1
convertOptions.LastPage = 1
convertOptions.BitsPerPixel = 24
convertOptions.QualityFactor = 2
Dim request As ConvertRequest = New ConvertRequest()
request.ConvertOptions = convertOptions
client.Convert(request)
client.Close()
End Sub
Public NotInheritable Class LEAD_VARS
Public Const ImagesDir As String = "C:\Users\Public\Documents\LEADTOOLS Images"
End Class