Overloads Public Function ExtractFramesNativeMemory( _
   ByVal stream As Stream, _
   ByVal frames As List(Of Integer) _
) As RasterNativeBuffer

Dim instance As Jpeg2000Engine
Dim stream As Stream
Dim frames As List(Of Integer)
Dim value As RasterNativeBuffer
 
value = instance.ExtractFramesNativeMemory(stream, frames)

public RasterNativeBuffer ExtractFramesNativeMemory( 
   Stream stream,
   List<int> frames
)

public:
RasterNativeBuffer ExtractFramesNativeMemory( 
   Stream^ stream,
   List<int>^ frames
) 

Private Function ExtractFramesNativeMemoryStreamExample(ByVal frames As List(Of Integer)) As RasterNativeBuffer
      Dim fs As FileStream = File.OpenRead(Path.Combine(LEAD_VARS.ImagesDir, "image1.jpx"))

      Dim engine As New Jpeg2000Engine()
      Dim fileInfo As Jpeg2000FileInformation = engine.GetFileInformation(fs)

      For i As Integer = 0 To frames.Count - 1
         If (frames(i) >= fileInfo.Frame.GetLength(0)) Then
            Return RasterNativeBuffer.Empty
         End If
      Next i
      Dim buffer As RasterNativeBuffer = engine.ExtractFramesNativeMemory(fs, frames)

      '  Clean up
      fs.Close()
      Return buffer
   End Function

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

public RasterNativeBuffer ExtractFramesNativeMemoryStreamExample(List<int> frames)
   {
      FileStream fs = File.OpenRead(Path.Combine(LEAD_VARS.ImagesDir, "image1.jpx"));

      Jpeg2000Engine engine = new Jpeg2000Engine();
      Jpeg2000FileInformation fileInfo = engine.GetFileInformation(fs);

      for (int i = 0; i < frames.Count; i++)
         if (frames[i] >= fileInfo.Frame.GetLength(0))
            return RasterNativeBuffer.Empty;
      RasterNativeBuffer buffer = engine.ExtractFramesNativeMemory(fs, frames);
      // Clean up
      fs.Close();
      return buffer;
   }

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