Imports Leadtools
Imports Leadtools.Codecs
Imports Leadtools.ImageProcessing.Effects
Public Sub SpatialFilterConstructorExample_S1()
Dim codecs As New RasterCodecs()
codecs.ThrowExceptionsOnInvalidImages = True
Dim leadImage As RasterImage = codecs.Load(Path.Combine(LEAD_VARS.ImagesDir, "Master.jpg"))
' Prepare the command
Dim command1 As SpatialFilterCommand = New SpatialFilterCommand(SpatialFilterCommandPredefined.EmbossSouth)
Dim data() As Integer = command1.Matrix
Dim command As SpatialFilterCommand = New SpatialFilterCommand
command.Divisor = command1.Divisor
command.Bias = command1.Bias
command.Matrix = data
MessageBox.Show("Array Dimension is :" & command1.Dimension.ToString())
'Apply the filter.
command.Run(leadImage)
codecs.Save(leadImage, Path.Combine(LEAD_VARS.ImagesDir, "Result.jpg"), RasterImageFormat.Jpeg, 24)
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;
using Leadtools.ImageProcessing.Effects;
public void SpatialFilterConstructorExample_S1()
{
// Load an image
RasterCodecs codecs = new RasterCodecs();
codecs.ThrowExceptionsOnInvalidImages = true;
RasterImage image = codecs.Load(Path.Combine(LEAD_VARS.ImagesDir, "Master.jpg"));
// Prepare the command
SpatialFilterCommand command1 = new SpatialFilterCommand(SpatialFilterCommandPredefined.EmbossSouth);
int [] data = command1.Matrix;
SpatialFilterCommand command = new SpatialFilterCommand();
command.Divisor = command1.Divisor;
command.Bias = command1.Bias;
command.Matrix = data;
MessageBox.Show("Array Dimension is :" + command1.Dimension.ToString());
//Apply the filter.
command.Run(image);
}
static class LEAD_VARS
{
public const string ImagesDir = @"C:\Users\Public\Documents\LEADTOOLS Images";
}
using Leadtools;
using Leadtools.Codecs;
using Leadtools.ImageProcessing.Effects;
using Leadtools.ImageProcessing;
public async Task SpatialFilterConstructorExample_S1()
{
// Load an image
RasterCodecs codecs = new RasterCodecs();
codecs.ThrowExceptionsOnInvalidImages = true;
// Load the image
string srcFileName = @"Assets\Image1.cmp";
StorageFile loadFile = await Tools.AppInstallFolder.GetFileAsync(srcFileName);
RasterImage image = await codecs.LoadAsync(LeadStreamFactory.Create(loadFile));
// Prepare the command
SpatialFilterCommand command1 = new SpatialFilterCommand(SpatialFilterCommandPredefined.EmbossSouth);
int [] data = command1.Matrix;
SpatialFilterCommand command = new SpatialFilterCommand();
command.Divisor = command1.Divisor;
command.Bias = command1.Bias;
command.Matrix = data;
Debug.WriteLine("Array Dimension is :" + command1.Dimension.ToString());
//Apply the filter.
command.Run(image);
}
using Leadtools;
using Leadtools.Codecs;
using Leadtools.ImageProcessing.Effects;
using Leadtools.Examples;
public void SpatialFilterConstructorExample_S1(RasterImage image, Stream outStream)
{
// Prepare the command
SpatialFilterCommand command1 = new SpatialFilterCommand(SpatialFilterCommandPredefined.EmbossSouth);
int[] data = command1.Matrix;
SpatialFilterCommand command = new SpatialFilterCommand();
command.Divisor = command1.Divisor;
command.Bias = command1.Bias;
command.Matrix = data;
Debug.WriteLine("Array Dimension is :" + command1.Dimension.ToString());
//Apply the filter.
command.Run(image);
// Save result image
RasterCodecs codecs = new RasterCodecs();
codecs.Save(image, outStream, RasterImageFormat.Jpeg, 24);
image.Dispose();
}
Imports Leadtools
Imports Leadtools.Codecs
Imports Leadtools.ImageProcessing.Effects
Public Sub SpatialFilterConstructorExample_S1(ByVal image As RasterImage, ByVal outStream As Stream)
' Prepare the command
Dim command1 As SpatialFilterCommand = New SpatialFilterCommand(SpatialFilterCommandPredefined.EmbossSouth)
Dim data As Integer() = command1.Matrix
Dim command As SpatialFilterCommand = New SpatialFilterCommand()
command.Divisor = command1.Divisor
command.Bias = command1.Bias
command.Matrix = data
Debug.WriteLine("Array Dimension is :" & command1.Dimension.ToString())
'Apply the filter.
command.Run(image)
' Save result image
Dim codecs As RasterCodecs = New RasterCodecs()
codecs.Save(image, outStream, RasterImageFormat.Jpeg, 24)
image.Dispose()
End Sub