Imports Leadtools
Imports Leadtools.Codecs
Public Sub CodecsPtokaOptionsExample()
Dim codecs As RasterCodecs = New RasterCodecs()
Dim srcFileName As String = Path.Combine(LEAD_VARS.ImagesDir, "Image1.ptk")
' Setting new options.
codecs.Options.Ptoka.Load.Resolution = 500
Dim image As RasterImage = codecs.Load(srcFileName)
' Clean up
image.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 CodecsPtokaOptionsExample()
{
RasterCodecs codecs = new RasterCodecs();
string srcFileName = Path.Combine(LEAD_VARS.ImagesDir, "Image1.ptk");
// Setting new options.
codecs.Options.Ptoka.Load.Resolution = 500;
RasterImage image = codecs.Load(srcFileName);
// Clean up
image.Dispose();
codecs.Dispose();
}
static class LEAD_VARS
{
public const string ImagesDir = @"C:\Users\Public\Documents\LEADTOOLS Images";
}