LEADTOOLS Image Processing (Leadtools.ImageOptimization assembly)

OptimizeBuffer(RasterCodecs,IntPtr,Int64,ImageOptimizerOptions,ImageOptimizerProgress) Method

Show in webframe
Example 





Leadtools.ImageOptimization Namespace > ImageOptimizer Class > OptimizeBuffer Method : OptimizeBuffer(RasterCodecs,IntPtr,Int64,ImageOptimizerOptions,ImageOptimizerProgress) Method
The Leadtools.Codecs.RasterCodecs object used internally in the optimization operation.
The original image buffer in memory as System.IntPtr array. The image format in memory should be one of the following supported formats:
The size, in bytes, of the buffer parameter in memory.
The options used in the optimization process.
Optional callback function that provides information about the progress of the optimization process.
Optimizes a supported image format buffer using the passed optimization options.
Syntax
'Declaration
 
Public Overloads Function OptimizeBuffer( _
   ByVal codecs As RasterCodecs, _
   ByVal buffer As IntPtr, _
   ByVal length As Long, _
   ByVal options As ImageOptimizerOptions, _
   ByVal progressCallback As ImageOptimizerProgress _
) As RasterNativeBuffer
'Usage
 
Dim instance As ImageOptimizer
Dim codecs As RasterCodecs
Dim buffer As IntPtr
Dim length As Long
Dim options As ImageOptimizerOptions
Dim progressCallback As ImageOptimizerProgress
Dim value As RasterNativeBuffer
 
value = instance.OptimizeBuffer(codecs, buffer, length, options, progressCallback)

            

        

            

            

            

        

            
        

            

        
            
Parameters
codecs


The Leadtools.Codecs.RasterCodecs object used internally in the optimization operation.
buffer


The original image buffer in memory as System.IntPtr array. The image format in memory should be one of the following supported formats:


length


The size, in bytes, of the buffer parameter in memory.
options


The options used in the optimization process.
progressCallback


Optional callback function that provides information about the progress of the optimization process.

            
            
Return Value
A Leadtools.RasterNativeBuffer structure that contains the image optimized buffer in memory.

            
            
            
            
Remarks
For more information, refer to Image Optimization Using The ImageOptimizer Class.

            
            
Example

             
    

            
            

            Copy Code
                
            

            

    

     

            
Imports Leadtools
Imports Leadtools.Codecs
Imports Leadtools.ImageOptimization
Imports Leadtools.Support.Examples

Public Sub TestPngImageOptimizer()
   ' Initialize the RasterCodecs class
   Dim Codecs As RasterCodecs = New RasterCodecs()

   ' The input and output location
   Dim inputFileName As String = Path.Combine(LEAD_VARS.ImagesDir, "LittleGFlyingAlpha.png")
   Dim outputFolder As String = Path.Combine(LEAD_VARS.ImagesDir, "OptimizedImages")

   ' Initialize a new Optimizer object
   Dim optimizer As ImageOptimizer = New ImageOptimizer()

   ' Optimization Options
   Dim options As ImageOptimizerOptions = ImageOptimizerOptions.Default

   '' Set custom optimization options
   options.Distance = 20
   options.Percent = 15
   options.PngQualityFactor = 4

   Dim bufferPtr As IntPtr
   Dim bufferSize As Integer = 0
   LoadFileIntoPointer(inputFileName, bufferPtr, bufferSize)

   If (IntPtr.Zero <> bufferPtr AndAlso bufferSize > 0) Then
      Dim optBuffer As RasterNativeBuffer = optimizer.OptimizeBuffer(Codecs, bufferPtr, bufferSize, options, Nothing)

      ' Free orgBuffer.PointerBuffer, since it won't be needed anymore.
      Marshal.FreeHGlobal(bufferPtr)

      ' Save this image into the output folder
      ' Make sure the output folder exists
      If (Not Directory.Exists(outputFolder)) Then
         Directory.CreateDirectory(outputFolder)
      End If

      ' Get the name of the output file from the input file
      Dim outputFileName As String = Path.Combine(outputFolder, Path.GetFileName(inputFileName))

      ' Save the optimized buffer to the output file
      Using fs As FileStream = File.Create(outputFileName)

         Dim optArray(CInt(optBuffer.Length)) As Byte

         Marshal.Copy(optBuffer.Data, optArray, 0, optArray.Length)
         fs.Write(optArray, 0, optArray.Length)
      End Using

      ' Free optBuffer.PointerBuffer, since it won't be needed anymore.
      Marshal.FreeHGlobal(optBuffer.Data)

      ' Compare the original image size with the optimized size.
      Dim orgSize As Long = New FileInfo(inputFileName).Length
      Dim optSize As Long = New FileInfo(outputFileName).Length
      Dim percentage As Integer = CType(CType(optSize * 100.0 / orgSize, Double), Integer)

      Dim message As String = String.Format( _
         "Original image size: {0} KB{1}Optimized image size: {2} KB{1}Percentage: {3}%", _
         orgSize / 1024, Environment.NewLine, optSize / 1024, _
         100 - percentage)
      Console.WriteLine(message)
   End If

   'shutdown the RasterCodecs class.
End Sub

' This method opens an image file and loads it into IntPtr.
Private Sub LoadFileIntoPointer(ByVal fileName As String, ByRef ptr As IntPtr, ByRef size As Integer)
   Using fs As FileStream = File.OpenRead(fileName)
      ' Allocate memory to load the file
      size = CType(fs.Length, Integer)
      ptr = Marshal.AllocHGlobal(size)

      ' Load in 32K chunks
      Const bufferSize As Integer = 32 * 1024
      Dim buffer(bufferSize) As Byte

      Dim bytesToRead As Integer

      Dim bytesLeft As Integer = CType(fs.Length, Integer)
      Dim tempPtr As IntPtr = ptr   ' where we are
      Do
         ' read a chunk
         bytesToRead = Math.Min(bufferSize, bytesLeft)
         If (bytesToRead > 0) Then
            fs.Read(buffer, 0, bytesToRead)

            ' copy into our buffer
            Marshal.Copy(buffer, 0, tempPtr, bytesToRead)

            ' move the temp pointer
            tempPtr = New IntPtr(tempPtr.ToInt64() + bytesToRead)

            bytesLeft -= bytesToRead
         End If
      Loop While (bytesToRead > 0)
   End Using
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.ImageOptimization;

public void TestPngImageOptimizer( )
{
   // Initialize the RasterCodecs class
   RasterCodecs codecs = new RasterCodecs();

   // The input and output location
   string inputFileName = Path.Combine(LEAD_VARS.ImagesDir, "LittleGFlyingAlpha.png");
   string outputFolder = Path.Combine(LEAD_VARS.ImagesDir, "OptimizedImages");

   // Initialize a new Optimizer object
   ImageOptimizer optimizer = new ImageOptimizer();

   // Optimization Options
   ImageOptimizerOptions options = ImageOptimizerOptions.Default;

   // Set custom optimization options
   options.Distance = 20;
   options.Percent = 15;
   options.PngQualityFactor = 4;

   IntPtr bufferPtr;
   int bufferSize = 0;
   LoadFileIntoPointer(inputFileName, out bufferPtr, out bufferSize);

   if(IntPtr.Zero != bufferPtr && bufferSize > 0)
   {
      RasterNativeBuffer optBuffer = optimizer.OptimizeBuffer(codecs, bufferPtr, bufferSize, options, null);

      // Free orgBuffer.PointerBuffer, since it won't be needed anymore.
      Marshal.FreeHGlobal(bufferPtr);

      // Save this image into the output folder
      // Make sure the output folder exists
      if(!Directory.Exists(outputFolder))
         Directory.CreateDirectory(outputFolder);

      // Get the name of the output file from the input file
      string outputFileName = Path.Combine(outputFolder, Path.GetFileName(inputFileName));

      // Save the optimized buffer to the output file
      using(FileStream fs = File.Create(outputFileName))
      {
         byte[] optArray = new byte[optBuffer.Length];

         Marshal.Copy(optBuffer.Data, optArray, 0, optArray.Length);
         fs.Write(optArray, 0, optArray.Length);
      }

      // Free optBuffer.PointerBuffer, since it won't be needed anymore.
      Marshal.FreeHGlobal(optBuffer.Data);

      // Compare the original image size with the optimized size.
      long orgSize = new FileInfo(inputFileName).Length;
      long optSize = new FileInfo(outputFileName).Length;
      int percentage = (int)((double)optSize * 100.0 / orgSize);

      string message = string.Format(
         "Original image size: {0} KB{1}Optimized image size: {2} KB{1}Percentage: {3}%",
         orgSize / 1024, Environment.NewLine, optSize / 1024,
         100 - percentage);
      MessageBox.Show(message);
   }

   //shutdown the RasterCodecs class.
}

// This method opens an image file and loads it into IntPtr.
private void LoadFileIntoPointer(string fileName, out IntPtr ptr, out int size)
{
   using(FileStream fs = File.OpenRead(fileName))
   {
      // Allocate memory to load the file
      size = (int)fs.Length;
      ptr = Marshal.AllocHGlobal(size);

      // Load in 32K chunks
      const int bufferSize = 32 * 1024;
      byte[] buffer = new byte[bufferSize];

      int bytesToRead;
      int bytesLeft = (int)fs.Length;
      IntPtr tempPtr = ptr;   // where we are
      do
      {
         // read a chunk
         bytesToRead = Math.Min(bufferSize, bytesLeft);
         if(bytesToRead > 0)
         {
            fs.Read(buffer, 0, bytesToRead);

            // copy into our buffer
            Marshal.Copy(buffer, 0, tempPtr, bytesToRead);

            // move the temp pointer
            tempPtr = new IntPtr(tempPtr.ToInt64() + bytesToRead);

            bytesLeft -= bytesToRead;
         }
      }
      while(bytesToRead > 0);
   }
}

static class LEAD_VARS
{
public const string ImagesDir = @"C:\Users\Public\Documents\LEADTOOLS Images";
}

            

   

      
	
      
	
    

            
            
Requirements
Target Platforms

            
            
See Also
Reference
ImageOptimizer Class

ImageOptimizer Members

Overload List