Overloads Public Shared Function ChangeToHBitmap( _
   ByVal image As RasterImage _
) As IntPtr

Dim image As RasterImage
Dim value As IntPtr
 
value = RasterImageConverter.ChangeToHBitmap(image)

public static IntPtr ChangeToHBitmap( 
   RasterImage image
)

public:
static IntPtr ChangeToHBitmap( 
   RasterImage^ image
) 

Public Sub ChangeToHBitmapExample()
      Dim codecs As New RasterCodecs()

      Dim hbitmap As IntPtr

      ' Load an image
      Using image As RasterImage = codecs.Load(Path.Combine(LEAD_VARS.ImagesDir, "Image1.cmp"), 24, CodecsLoadByteOrder.BgrOrGray, 1, 1)
         ' Change to DDB
         hbitmap = RasterImageConverter.ChangeToHBitmap(image)

         ' Dispose the image since it is unusable now
      End Using

      ' Change the DDB to a new LEAD RasterImage
      Using image As RasterImage = RasterImageConverter.ChangeFromHBitmap(hbitmap, IntPtr.Zero)
         ' Save this image back to disk
         codecs.Save(image, Path.Combine(LEAD_VARS.ImagesDir, "Image1_ChangeToHBitmap.bmp"), RasterImageFormat.Bmp, 24)
      End Using

      DeleteObject(hbitmap)

      ' Clean up
      codecs.Dispose()
   End Sub

Public NotInheritable Class LEAD_VARS
   Public Const ImagesDir As String = "C:\Users\Public\Documents\LEADTOOLS Images"
End Class

public void ChangeToHBitmapExample()
   {
      RasterCodecs codecs = new RasterCodecs();

      IntPtr hbitmap;

      // Load an image
      using(RasterImage image = codecs.Load(Path.Combine(LEAD_VARS.ImagesDir, "Image1.cmp"), 24, CodecsLoadByteOrder.BgrOrGray, 1, 1))
      {
         // Change to DDB
         hbitmap = RasterImageConverter.ChangeToHBitmap(image);

         // Dispose the image since it is unusable now
      }

      // Change the DDB to a new LEAD RasterImage
      using(RasterImage image = RasterImageConverter.ChangeFromHBitmap(hbitmap, IntPtr.Zero))
      {
         // Save this image back to disk
         codecs.Save(image, Path.Combine(LEAD_VARS.ImagesDir, "Image1_ChangeToHBitmap.bmp"), RasterImageFormat.Bmp, 24);
      }

      DeleteObject(hbitmap);

      // Clean up
      codecs.Dispose();
   }

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