Imports Leadtools
Imports Leadtools.Codecs
Imports Leadtools.ImageProcessing
Public Sub SetAlphaValuesCommandExample()
Dim codecs As RasterCodecs = New RasterCodecs()
Dim srcFileName As String = Path.Combine(LEAD_VARS.ImagesDir, "Image1.cmp")
Dim destFileName As String = Path.Combine(LEAD_VARS.ImagesDir, "SetAlphaValuesCommand.bmp")
' Load the source image from disk
Dim image As RasterImage = codecs.Load(srcFileName)
' Convert the image to 32-bits/pixel
Dim colorResolution As ColorResolutionCommand = New ColorResolutionCommand(ColorResolutionCommandMode.InPlace, 32, RasterByteOrder.Bgr, RasterDitheringMethod.None, ColorResolutionCommandPaletteFlags.None, Nothing)
colorResolution.Run(image)
Debug.Assert(image.BitsPerPixel = 32)
' Set the alpha values
Dim setAlphaValues As SetAlphaValuesCommand = New SetAlphaValuesCommand()
setAlphaValues.Alpha = 128
setAlphaValues.Run(image)
' Save the image back to disk
codecs.Save(image, destFileName, RasterImageFormat.Bmp, 32)
' Clean Up
image.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;
using Leadtools.ImageProcessing;
public void SetAlphaValuesCommandExample()
{
RasterCodecs codecs = new RasterCodecs();
string srcFileName = Path.Combine(ImagesPath.Path, "Image1.cmp");
string destFileName = Path.Combine(ImagesPath.Path, "SetAlphaValuesCommand.bmp");
// Load the source image from disk
RasterImage image = codecs.Load(srcFileName);
// Convert the image to 32-bits/pixel
ColorResolutionCommand colorResolution = new ColorResolutionCommand(
ColorResolutionCommandMode.InPlace,
32,
RasterByteOrder.Bgr,
RasterDitheringMethod.None,
ColorResolutionCommandPaletteFlags.None,
null);
colorResolution.Run(image);
Assert.IsTrue(image.BitsPerPixel == 32);
// Set the alpha values
SetAlphaValuesCommand setAlphaValues = new SetAlphaValuesCommand();
setAlphaValues.Alpha = 128;
setAlphaValues.Run(image);
// Save the image back to disk
codecs.Save(image, destFileName, RasterImageFormat.Bmp, 32);
// Clean Up
image.Dispose();
codecs.Dispose();
}
RasterCommandExamples.prototype.SetAlphaValuesCommandExample = function () {
Tools.SetLicense();
with (Leadtools) {
with (Leadtools.Codecs) {
with (Leadtools.ImageProcessing) {
var codecs = new RasterCodecs();
var srcFileName = "Assets\\Image1.cmp";
var destFileName = "SetAlphaValuesCommand.bmp";
var image;
// Load the source image from disk
return Tools.AppInstallFolder().getFileAsync(srcFileName).then(function (loadFile) {
return codecs.loadAsync(LeadStreamFactory.create(loadFile))
})
.then(function (img) {
image = img;
// Convert the image to 32-bits/pixel
var colorResolution = new ColorResolutionCommand(
ColorResolutionCommandMode.inPlace,
32,
RasterByteOrder.bgr,
RasterDitheringMethod.none,
ColorResolutionCommandPaletteFlags.none,
null);
colorResolution.run(image);
console.assert(image.bitsPerPixel === 32, "image.bitsPerPixel == 32");
// Set the alpha values
setAlphaValues = new SetAlphaValuesCommand();
setAlphaValues.alpha = 128;
setAlphaValues.run(image);
// Save the image back to disk
return Tools.AppLocalFolder().createFileAsync(destFileName)})
.then ( function ( saveFile ) {
return codecs.saveAsync(image, LeadStreamFactory.create(saveFile), RasterImageFormat.bmp, 32)
})
.then(function () {
// Clean Up
image.close();
});
}
}
}
}
using Leadtools;
using Leadtools.Codecs;
using Leadtools.ImageProcessing;
public async Task SetAlphaValuesCommandExample()
{
RasterCodecs codecs = new RasterCodecs();
string srcFileName = @"Assets\Image1.cmp";
string destFileName = @"SetAlphaValuesCommand.bmp";
// Load the source image from disk
StorageFile loadFile = await Tools.AppInstallFolder.GetFileAsync(srcFileName);
RasterImage image = await codecs.LoadAsync(LeadStreamFactory.Create(loadFile));
// Convert the image to 32-bits/pixel
ColorResolutionCommand colorResolution = new ColorResolutionCommand(
ColorResolutionCommandMode.InPlace,
32,
RasterByteOrder.Bgr,
RasterDitheringMethod.None,
ColorResolutionCommandPaletteFlags.None,
null);
colorResolution.Run(image);
Assert.IsTrue(image.BitsPerPixel == 32);
// Set the alpha values
SetAlphaValuesCommand setAlphaValues = new SetAlphaValuesCommand();
setAlphaValues.Alpha = 128;
setAlphaValues.Run(image);
// Save the image back to disk
StorageFile saveFile = await Tools.AppLocalFolder.CreateFileAsync(destFileName);
await codecs.SaveAsync(image, LeadStreamFactory.Create(saveFile), RasterImageFormat.Bmp, 32);
// Clean Up
image.Dispose();
}
using Leadtools;
using Leadtools.Codecs;
using Leadtools.Examples;
using Leadtools.ImageProcessing;
using Leadtools.Windows.Media;
public void SetAlphaValuesCommandExample(RasterImage image, Stream destStream)
{
RasterCodecs codecs = new RasterCodecs();
// Convert the image to 32-bits/pixel
ColorResolutionCommand colorResolution = new ColorResolutionCommand(
ColorResolutionCommandMode.InPlace,
32,
RasterByteOrder.Bgr,
RasterDitheringMethod.None,
ColorResolutionCommandPaletteFlags.None,
null);
colorResolution.Run(image);
Debug.Assert(image.BitsPerPixel == 32);
// Set the alpha values
SetAlphaValuesCommand setAlphaValues = new SetAlphaValuesCommand();
setAlphaValues.Alpha = 128;
setAlphaValues.Run(image);
// Save the image back to disk
codecs.Save(image, destStream, RasterImageFormat.Bmp, 32);
// Clean Up
image.Dispose();
}
Imports Leadtools
Imports Leadtools.Codecs
Imports Leadtools.ImageProcessing
Imports Leadtools.Windows.Media
Public Sub SetAlphaValuesCommandExample(ByVal image As RasterImage, ByVal destStream As Stream)
Dim codecs As RasterCodecs = New RasterCodecs()
' Convert the image to 32-bits/pixel
Dim colorResolution As ColorResolutionCommand = New ColorResolutionCommand(ColorResolutionCommandMode.InPlace, 32, RasterByteOrder.Bgr, RasterDitheringMethod.None, ColorResolutionCommandPaletteFlags.None, Nothing)
colorResolution.Run(image)
Debug.Assert(image.BitsPerPixel = 32)
' Set the alpha values
Dim setAlphaValues As SetAlphaValuesCommand = New SetAlphaValuesCommand()
setAlphaValues.Alpha = 128
setAlphaValues.Run(image)
' Save the image back to disk
codecs.Save(image, destStream, RasterImageFormat.Bmp, 32)
' Clean Up
image.Dispose()
End Sub