Overloads Public Sub Save( _
   ByVal image As RasterImage, _
   ByVal fileName As String, _
   ByVal format As RasterImageFormat, _
   ByVal bitsPerPixel As Integer, _
   ByVal firstPage As Integer, _
   ByVal lastPage As Integer, _
   ByVal firstSavePageNumber As Integer, _
   ByVal pageMode As CodecsSavePageMode _
) 

Dim instance As RasterCodecs
Dim image As RasterImage
Dim fileName As String
Dim format As RasterImageFormat
Dim bitsPerPixel As Integer
Dim firstPage As Integer
Dim lastPage As Integer
Dim firstSavePageNumber As Integer
Dim pageMode As CodecsSavePageMode
 
instance.Save(image, fileName, format, bitsPerPixel, firstPage, lastPage, firstSavePageNumber, pageMode)

public void Save( 
   RasterImage image,
   string fileName,
   RasterImageFormat format,
   int bitsPerPixel,
   int firstPage,
   int lastPage,
   int firstSavePageNumber,
   CodecsSavePageMode pageMode
)

public:
void Save( 
   RasterImage^ image,
   String^ fileName,
   RasterImageFormat format,
   int bitsPerPixel,
   int firstPage,
   int lastPage,
   int firstSavePageNumber,
   CodecsSavePageMode pageMode
) 

Public Sub SaveFile2Example()
      Dim codecs As RasterCodecs = New RasterCodecs()

      Dim destFileName As String = Path.Combine(LEAD_VARS.ImagesDir, "Image1_SaveFile2.tif")

      ' Create a RasterImage with 4 pages containing text showing the page number
      Dim image As RasterImage = Nothing
      Const pageCount As Integer = 4

      Using f As New System.Drawing.Font("Arial", 36, System.Drawing.FontStyle.Bold)
         Using btmp As New System.Drawing.Bitmap(320, 200)
            Using sf As New System.Drawing.StringFormat()
               Dim rc As New System.Drawing.Rectangle(0, 0, btmp.Width, btmp.Height)
               sf.Alignment = System.Drawing.StringAlignment.Center
               sf.LineAlignment = System.Drawing.StringAlignment.Center

               For i As Integer = 1 To pageCount
                  ' Create a GDI+ bitmap with the text
                  Dim text As String = "Page " + i.ToString()

                  Using g As System.Drawing.Graphics = System.Drawing.Graphics.FromImage(btmp)
                     g.FillRectangle(System.Drawing.Brushes.White, rc)
                     g.DrawString(text, f, System.Drawing.Brushes.Black, rc, sf)
                  End Using

                  Dim tempImage As RasterImage = RasterImageConverter.ConvertFromImage(btmp, ConvertFromImageOptions.None)

                  If image Is Nothing Then
                     image = tempImage
                  Else
                     image.AddPage(tempImage)
                  End If
               Next
            End Using
         End Using
      End Using

      ' Save all the pages to the file
      ' The file should have 4 pages now: 1, 2, 3, 4
      codecs.Save(image, destFileName, RasterImageFormat.Tif, 1, 1, pageCount, 1, CodecsSavePageMode.Overwrite)
      image.Dispose()

      ' Load the 3rd page and insert it as the second
      ' The file should have 5 pages now: 1, 3, 2, 3, 4
      image = codecs.Load(destFileName, 0, CodecsLoadByteOrder.BgrOrGray, 3, 3)
      codecs.Save(image, destFileName, RasterImageFormat.Tif, 1, 1, 1, 2, CodecsSavePageMode.Insert)
      image.Dispose()

      ' Load the last page, and insert it as the first
      ' The file should have 5 pages now: 4, 1, 3, 2, 3, 4
      image = codecs.Load(destFileName, 0, CodecsLoadByteOrder.BgrOrGray, 5, 5)
      codecs.Save(image, destFileName, RasterImageFormat.Tif, 1, 1, 1, 1, CodecsSavePageMode.Insert)
      image.Dispose()

      ' Replace the 5th page with the 2nd
      ' The file should have 5 pages now: 4, 1, 3, 2, 1, 4
      image = codecs.Load(destFileName, 0, CodecsLoadByteOrder.BgrOrGray, 2, 2)
      codecs.Save(image, destFileName, RasterImageFormat.Tif, 1, 1, 1, 5, CodecsSavePageMode.Replace)
      image.Dispose()

      ' Delete the 2nd and 6th pages
      ' The file should have 5 pages now: 4, 3, 2, 1
      codecs.DeletePage(destFileName, 2)
      ' Notice, -1 because we already deleted a page, so 6th page is not 5th
      codecs.DeletePage(destFileName, 6 - 1)

      ' 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 SaveFile2Example()
   {
      RasterCodecs codecs = new RasterCodecs();

      string destFileName = Path.Combine(LEAD_VARS.ImagesDir, "Image1_SaveFile2.tif");

      // Use GDI+ to create a RasterImage with 4 pages containing text showing the page number
      RasterImage image = null;
      const int pageCount = 4;

      using(System.Drawing.Font f = new System.Drawing.Font("Arial", 36, System.Drawing.FontStyle.Bold))
      using(System.Drawing.Bitmap btmp = new System.Drawing.Bitmap(320, 200))
      using(System.Drawing.StringFormat sf = new System.Drawing.StringFormat())
      {
         System.Drawing.Rectangle rc = new System.Drawing.Rectangle(0, 0, btmp.Width, btmp.Height);
         sf.Alignment = System.Drawing.StringAlignment.Center;
         sf.LineAlignment = System.Drawing.StringAlignment.Center;

         for(int i = 1; i <= pageCount; i++)
         {
            // Create a GDI+ bitmap with the text
            string text = "Page " + i;

            using(System.Drawing.Graphics g = System.Drawing.Graphics.FromImage(btmp))
            {
               g.FillRectangle(System.Drawing.Brushes.White, rc);
               g.DrawString(text, f, System.Drawing.Brushes.Black, rc, sf);
            }

            RasterImage tempImage = Leadtools.Drawing.RasterImageConverter.ConvertFromImage(btmp, Leadtools.Drawing.ConvertFromImageOptions.None);

            if(image == null)
               image = tempImage;
            else
               image.AddPage(tempImage);
         }
      }

      // Save all the pages to the file
      // The file should have 4 pages now: 1, 2, 3, 4
      codecs.Save(image, destFileName, RasterImageFormat.Tif, 1, 1, pageCount, 1, CodecsSavePageMode.Overwrite);
      image.Dispose();

      // Load the 3rd page and insert it as the second
      // The file should have 5 pages now: 1, 3, 2, 3, 4
      image = codecs.Load(destFileName, 0, CodecsLoadByteOrder.BgrOrGray, 3, 3);
      codecs.Save(image, destFileName, RasterImageFormat.Tif, 1, 1, 1, 2, CodecsSavePageMode.Insert);
      image.Dispose();

      // Load the last page, and insert it as the first
      // The file should have 5 pages now: 4, 1, 3, 2, 3, 4
      image = codecs.Load(destFileName, 0, CodecsLoadByteOrder.BgrOrGray, 5, 5);
      codecs.Save(image, destFileName, RasterImageFormat.Tif, 1, 1, 1, 1, CodecsSavePageMode.Insert);
      image.Dispose();

      // Replace the 5th page with the 2nd
      // The file should have 5 pages now: 4, 1, 3, 2, 1, 4
      image = codecs.Load(destFileName, 0, CodecsLoadByteOrder.BgrOrGray, 2, 2);
      codecs.Save(image, destFileName, RasterImageFormat.Tif, 1, 1, 1, 5, CodecsSavePageMode.Replace);
      image.Dispose();

      // Delete the 2nd and 6th pages
      // The file should have 5 pages now: 4, 3, 2, 1
      codecs.DeletePage(destFileName, 2);
      // Notice, -1 because we already deleted a page, so 6th page is not 5th
      codecs.DeletePage(destFileName, 6 - 1);

      // Clean up
      codecs.Dispose();
   }

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

public void SaveStream2Example(int width, int height, int pageCount, Stream outStreamTif)
{
   RasterCodecs codecs = new RasterCodecs();
   // Create a RasterImage with 4 pages containing text showing the page number
   RasterImage image = null;

   // The white background canvas
   Canvas canvas = new Canvas();
   canvas.Width = width;
   canvas.Height = height;
   canvas.Background = new SolidColorBrush(Color.FromArgb(255, 255, 255, 255));

   // The black text block
   TextBlock textBlock = new TextBlock();
   textBlock.FontFamily = new FontFamily("Arial");
   textBlock.FontSize = 36;
   textBlock.Foreground = new SolidColorBrush(Color.FromArgb(255, 0, 0, 0));
   canvas.Children.Add(textBlock);

   for (int i = 1; i <= pageCount; i++)
   {
      // The text we want on the page
      string text = "Page " + i;
      textBlock.Text = text;

      // Center the text
      double left = (canvas.Width - textBlock.ActualWidth) / 2;
      double top = (canvas.Height - textBlock.ActualHeight) / 2;
      textBlock.SetValue(Canvas.LeftProperty, left);
      textBlock.SetValue(Canvas.TopProperty, top);

      // Create a Writeable bitmap with the text
      WriteableBitmap wb = new WriteableBitmap(width, height);

      wb.Render(canvas, null);
      wb.Invalidate();

      // Convert it to a RasterImage
      RasterImage pageImage = RasterImageConverter.ConvertFromSource(wb, ConvertFromSourceOptions.None);

      // Add it as a page to our main raster image
      if (image == null)
         image = pageImage;
      else
         image.AddPage(pageImage);
   }

   // Save all the pages to the file
   // The file should have 4 pages now: 1, 2, 3, 4
   codecs.Save(image, outStreamTif, RasterImageFormat.Tif, 1, 1, pageCount, 1, CodecsSavePageMode.Overwrite);
   image.Dispose();

   // Load the 3rd page and insert it as the second
   // The file should have 5 pages now: 1, 3, 2, 3, 4
   image = codecs.Load(outStreamTif, 0, CodecsLoadByteOrder.BgrOrGray, 3, 3);
   codecs.Save(image, outStreamTif, RasterImageFormat.Tif, 1, 1, 1, 2, CodecsSavePageMode.Insert);
   image.Dispose();

   // Load the last page, and insert it as the first
   // The file should have 5 pages now: 4, 1, 3, 2, 3, 4
   image = codecs.Load(outStreamTif, 0, CodecsLoadByteOrder.BgrOrGray, 5, 5);
   codecs.Save(image, outStreamTif, RasterImageFormat.Tif, 1, 1, 1, 1, CodecsSavePageMode.Insert);
   image.Dispose();

   // Replace the 5th page with the 2nd
   // The file should have 5 pages now: 4, 1, 3, 2, 1, 4
   image = codecs.Load(outStreamTif, 0, CodecsLoadByteOrder.BgrOrGray, 2, 2);
   codecs.Save(image, outStreamTif, RasterImageFormat.Tif, 1, 1, 1, 5, CodecsSavePageMode.Replace);
   image.Dispose();

   // Delete the 2nd and 6th pages
   // The file should have 5 pages now: 4, 3, 2, 1
   codecs.DeletePage(outStreamTif, 2);
   // Notice, -1 because we already deleted a page, so 6th page is not 5th
   codecs.DeletePage(outStreamTif, 6 - 1);
}

Public Sub SaveStream2Example(ByVal width As Integer, ByVal height As Integer, ByVal pageCount As Integer, ByVal outStreamTif As Stream)
   Dim codecs As RasterCodecs = New RasterCodecs()
   ' Create a RasterImage with 4 pages containing text showing the page number
   Dim image As RasterImage = Nothing

   ' The white background canvas
   Dim canvas As Canvas = New Canvas()
   canvas.Width = width
   canvas.Height = height
   canvas.Background = New SolidColorBrush(Color.FromArgb(255, 255, 255, 255))

   ' The black text block
   Dim textBlock As TextBlock = New TextBlock()
   textBlock.FontFamily = New FontFamily("Arial")
   textBlock.FontSize = 36
   textBlock.Foreground = New SolidColorBrush(Color.FromArgb(255, 0, 0, 0))
   canvas.Children.Add(textBlock)

   Dim i As Integer = 1
   Do While i <= pageCount
      ' The text we want on the page
      Dim text As String = "Page " & i
      textBlock.Text = text

      ' Center the text
      Dim left As Double = (canvas.Width - textBlock.ActualWidth) / 2
      Dim top As Double = (canvas.Height - textBlock.ActualHeight) / 2
      textBlock.SetValue(Canvas.LeftProperty, left)
      textBlock.SetValue(Canvas.TopProperty, top)

      ' Create a Writeable bitmap with the text
      Dim wb As WriteableBitmap = New WriteableBitmap(width, height)

      wb.Render(canvas, Nothing)
      wb.Invalidate()

      ' Convert it to a RasterImage
      Dim pageImage As RasterImage = RasterImageConverter.ConvertFromSource(wb, ConvertFromSourceOptions.None)

      ' Add it as a page to our main raster image
      If image Is Nothing Then
         image = pageImage
      Else
         image.AddPage(pageImage)
      End If
      i += 1
   Loop

   ' Save all the pages to the file
   ' The file should have 4 pages now: 1, 2, 3, 4
   codecs.Save(image, outStreamTif, RasterImageFormat.Tif, 1, 1, pageCount, 1, CodecsSavePageMode.Overwrite)
   image.Dispose()

   ' Load the 3rd page and insert it as the second
   ' The file should have 5 pages now: 1, 3, 2, 3, 4
   image = codecs.Load(outStreamTif, 0, CodecsLoadByteOrder.BgrOrGray, 3, 3)
   codecs.Save(image, outStreamTif, RasterImageFormat.Tif, 1, 1, 1, 2, CodecsSavePageMode.Insert)
   image.Dispose()

   ' Load the last page, and insert it as the first
   ' The file should have 5 pages now: 4, 1, 3, 2, 3, 4
   image = codecs.Load(outStreamTif, 0, CodecsLoadByteOrder.BgrOrGray, 5, 5)
   codecs.Save(image, outStreamTif, RasterImageFormat.Tif, 1, 1, 1, 1, CodecsSavePageMode.Insert)
   image.Dispose()

   ' Replace the 5th page with the 2nd
   ' The file should have 5 pages now: 4, 1, 3, 2, 1, 4
   image = codecs.Load(outStreamTif, 0, CodecsLoadByteOrder.BgrOrGray, 2, 2)
   codecs.Save(image, outStreamTif, RasterImageFormat.Tif, 1, 1, 1, 5, CodecsSavePageMode.Replace)
   image.Dispose()

   ' Delete the 2nd and 6th pages
   ' The file should have 5 pages now: 4, 3, 2, 1
   codecs.DeletePage(outStreamTif, 2)
   ' Notice, -1 because we already deleted a page, so 6th page is not 5th
   codecs.DeletePage(outStreamTif, 6 - 1)
End Sub