Imports Leadtools
Imports Leadtools.Codecs
Public Sub CodecsPcdOptionsExample()
Dim codecs As RasterCodecs = New RasterCodecs()
Dim srcFileName As String = Path.Combine(LEAD_VARS.ImagesDir, "Image1.pcd")
' get the current PCD load resolution
Dim sz As LeadSize = codecs.Options.Pcd.Load.Resolution
Console.WriteLine("Before set: {0}", sz)
' change it to 100 by 100 pixels
codecs.Options.Pcd.Load.Resolution = New LeadSize(96, 64)
sz = codecs.Options.Pcd.Load.Resolution
Console.WriteLine("After set: {0}", sz)
Dim srcImage As RasterImage = codecs.Load(srcFileName)
codecs.Save(srcImage, Path.Combine(LEAD_VARS.ImagesDir, "pcd.bmp"), RasterImageFormat.Bmp, srcImage.BitsPerPixel)
' Clean up
srcImage.Dispose()
codecs.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;
public void CodecsPcdOptionsExample()
{
RasterCodecs codecs = new RasterCodecs();
string srcFileName = Path.Combine(LEAD_VARS.ImagesDir, "Image1.pcd");
// get the current PCD load resolution
LeadSize sz = codecs.Options.Pcd.Load.Resolution;
Console.WriteLine("Before set: {0}", sz);
// change it to 100 by 100 pixels
codecs.Options.Pcd.Load.Resolution = new LeadSize(96, 64);
sz = codecs.Options.Pcd.Load.Resolution;
Console.WriteLine("After set: {0}", sz);
RasterImage srcImage = codecs.Load(srcFileName);
codecs.Save(srcImage, Path.Combine(LEAD_VARS.ImagesDir, "pcd.bmp"), RasterImageFormat.Bmp, srcImage.BitsPerPixel);
// Clean up
srcImage.Dispose();
codecs.Dispose();
}
static class LEAD_VARS
{
public const string ImagesDir = @"C:\Users\Public\Documents\LEADTOOLS Images";
}