Overloads Public Sub Save( _
   ByVal codecs As RasterCodecs, _
   ByVal fileName As String, _
   ByVal image As RasterImage, _
   ByVal format As Jpeg2000FileFormat, _
   ByVal bitsPerPixel As Integer, _
   ByVal qualityFactor As Integer _
) 

Dim instance As Jpeg2000Engine
Dim codecs As RasterCodecs
Dim fileName As String
Dim image As RasterImage
Dim format As Jpeg2000FileFormat
Dim bitsPerPixel As Integer
Dim qualityFactor As Integer
 
instance.Save(codecs, fileName, image, format, bitsPerPixel, qualityFactor)

public void Save( 
   RasterCodecs codecs,
   string fileName,
   RasterImage image,
   Jpeg2000FileFormat format,
   int bitsPerPixel,
   int qualityFactor
)

public:
void Save( 
   RasterCodecs^ codecs,
   String^ fileName,
   RasterImage^ image,
   Jpeg2000FileFormat format,
   int bitsPerPixel,
   int qualityFactor
) 

Public Sub SaveStringExample()
      Dim codecs As New RasterCodecs()
      codecs.ThrowExceptionsOnInvalidImages = True

      ' Load a JPEG 2000 image
      Dim engine As New Jpeg2000Engine()
      Dim image As RasterImage = engine.Load(codecs, Path.Combine(LEAD_VARS.ImagesDir, "image1.jp2"), 0, CodecsLoadByteOrder.BgrOrGray)

      Dim xmlBoxes As List(Of XmlBox) = engine.GetBoxes(Of XmlBox)(Jpeg2000FileFormat.LeadJp2)
      Dim resBox As ResolutionBox = DirectCast(engine.GetBox(Jpeg2000FileFormat.LeadJp2, Jpeg2000BoxType.ResolutionBox), ResolutionBox)

      engine.ResetEngineBoxes()
      ' Set the JPX engine's XML box
      engine.SetBoxes(Jpeg2000FileFormat.LeadJpx, xmlBoxes)
      engine.SetBox(Jpeg2000FileFormat.LeadJpx, resBox)
      ' Save the image in JPX file format
      engine.Save(codecs, Path.Combine(LEAD_VARS.ImagesDir, "Test.jpx"), image, Jpeg2000FileFormat.LeadJpx, 24, 5)
      ' Append Intellectual Property Rights box
      Dim copyRights As String = ("Copyright (c) 1991-2008 by LEAD Technologies, Inc. All Rights Reserved.")
      Dim ipr As New IprBox()
      ipr.Data = Encoding.ASCII.GetBytes(copyRights)
      engine.AppendBox(Path.Combine(LEAD_VARS.ImagesDir, "Test.jpx"), ipr)
      ' 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

public void SaveStringExample()
   {
      RasterCodecs codecs = new RasterCodecs();
      codecs.ThrowExceptionsOnInvalidImages = true;

      // Load a JPEG 2000 image
      Jpeg2000Engine engine = new Jpeg2000Engine();
      RasterImage image = engine.Load(codecs, Path.Combine(LEAD_VARS.ImagesDir, "image1.jp2"), 0, CodecsLoadByteOrder.BgrOrGray);

      List<XmlBox> xmlBoxes = engine.GetBoxes<XmlBox>(Jpeg2000FileFormat.LeadJp2);
      ResolutionBox resBox = (ResolutionBox)engine.GetBox(Jpeg2000FileFormat.LeadJp2, Jpeg2000BoxType.ResolutionBox);

      engine.ResetEngineBoxes();
      //Set the JPX engine's XML box
      engine.SetBoxes(Jpeg2000FileFormat.LeadJpx, xmlBoxes);
      engine.SetBox(Jpeg2000FileFormat.LeadJpx, resBox);
      //Save the image in JPX file format
      engine.Save(codecs, Path.Combine(LEAD_VARS.ImagesDir, "Test.jpx"), image, Jpeg2000FileFormat.LeadJpx, 24, 5);
      //Append Intellectual Property Rights box
      String copyRights = ("Copyright (c) 1991-2008 by LEAD Technologies, Inc. All Rights Reserved.");
      IprBox ipr = new IprBox();
      ipr.Data = Encoding.ASCII.GetBytes(copyRights);
      engine.AppendBox(Path.Combine(LEAD_VARS.ImagesDir, "Test.jpx"), ipr);
      // Clean up
      image.Dispose();
      codecs.Dispose();
   }

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