AnnPrinter Class

Visual Basic
C#
WinRT C#
WinRT JavaScript
C++

public class AnnPrinter : Leadtools.WinForms.RasterImagePrinter

'Declaration
 
Public Class AnnPrinter 
   Inherits Leadtools.WinForms.RasterImagePrinter

'Usage
 
Dim instance As AnnPrinter

public sealed class AnnPrinter : Leadtools.WinForms.RasterImagePrinter

function Leadtools.Annotations.AnnPrinter()

public ref class AnnPrinter : public Leadtools.WinForms.RasterImagePrinter

The AnnPrinter class derives from Leadtools.WinForms.RasterImagePrinter to make the process of printing an AnnContainer on top of an Leadtools.RasterImage easier.

Printing using the .NET framework involves adding a handler to the System.Drawing.Printing.PrintDocument.PrintPage event. In that event handler, you set up a new instance of the AnnPrinter class, set up its properties as desired, and then call the Print(RasterImage,Int32,AnnContainer,PrintPageEventArgs) method passing it the Leadtools.RasterImage to print, the image page number, the AnnContainer containing the annotation objects to be printed and the System.Drawing.Printing.PrintPageEventArgs object obtained through your System.Drawing.Printing.PrintPageEventHandler.

Visual Basic
C#
WinRT C#
WinRT JavaScript
Silverlight C#
Silverlight VB

Private myImage As RasterImage
   Private myContainer As AnnContainer
   Private Sub AnnPrinter_AnnPrinter()
      ' load an image
      Dim codecs As RasterCodecs = New RasterCodecs()
      myImage = codecs.Load(Path.Combine(LEAD_VARS.ImagesDir, "Sample1.cmp"))
      ' create a new container and add a few objects
      myContainer = New AnnContainer()
      myContainer.Bounds = New AnnRectangle(0, 0, myImage.Width, myImage.Height)

      Dim lineObj As AnnLineObject = New AnnLineObject()
      lineObj.StartPoint = New AnnPoint(100, 100, AnnUnit.Pixel)
      lineObj.EndPoint = New AnnPoint(200, 300, AnnUnit.Pixel)
      lineObj.Pen = New AnnPen(Color.Red, New AnnLength(4, AnnUnit.Pixel))
      myContainer.Objects.Add(lineObj)

      Dim rectObj As AnnRectangleObject = New AnnRectangleObject()
      rectObj.Bounds = New AnnRectangle(100, 100, 100, 100, AnnUnit.Pixel)
      rectObj.Pen = New AnnPen(Color.Blue, New AnnLength(1, AnnUnit.Pixel))
      rectObj.Brush = New AnnSolidBrush(Color.Yellow)
      myContainer.Objects.Add(rectObj)

      ' intitialize a new PrintDocument object
      If Not PrinterSettings.InstalledPrinters Is Nothing AndAlso PrinterSettings.InstalledPrinters.Count > 0 Then
         Dim printDocument As PrintDocument = New PrintDocument()
         AddHandler printDocument.PrintPage, AddressOf PrintDocument_PrintPage
         printDocument.Print()
      End If

      ' dispose the image
      myImage.Dispose()
   End Sub

   Private Sub PrintDocument_PrintPage(ByVal sender As Object, ByVal e As PrintPageEventArgs)
      Dim printer As AnnPrinter = New AnnPrinter()

      ' We want normal size (not zoomed) but centered
      printer.SizeMode = RasterPaintSizeMode.Fit
      printer.HorizontalAlignMode = RasterPaintAlignMode.Center
      printer.VerticalAlignMode = RasterPaintAlignMode.Center

      ' print the whole image
      printer.ImageRectangle = Rectangle.Empty

      ' use maximum page
      printer.PageRectangle = RectangleF.Empty

      ' Win32 GDI printing and scale to gray
      Dim props As RasterPaintProperties = RasterPaintProperties.Default
      props.PaintEngine = RasterPaintEngine.Gdi
      props.PaintDisplayMode = props.PaintDisplayMode Or RasterPaintDisplayModeFlags.ScaleToGray
      printer.PaintProperties = props
      printer.Print(myImage, myImage.Page, myContainer, e)
   End Sub

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

RasterImage myImage;
   AnnContainer myContainer;
   private void AnnPrinter_AnnPrinter()
   {
      // load an image
      RasterCodecs codecs = new RasterCodecs();
      string fileName = Path.Combine(LEAD_VARS.ImagesDir, "Sample1.cmp");
      myImage = codecs.Load(fileName);
      // create a new container and add a few objects
      myContainer = new AnnContainer();
      myContainer.Bounds = new AnnRectangle(0, 0, myImage.Width, myImage.Height);

      AnnLineObject lineObj = new AnnLineObject();
      lineObj.StartPoint = new AnnPoint(100, 100, AnnUnit.Pixel);
      lineObj.EndPoint = new AnnPoint(200, 300, AnnUnit.Pixel);
      lineObj.Pen = new AnnPen(Color.Red, new AnnLength(4, AnnUnit.Pixel));
      myContainer.Objects.Add(lineObj);

      AnnRectangleObject rectObj = new AnnRectangleObject();
      rectObj.Bounds = new AnnRectangle(100, 100, 100, 100, AnnUnit.Pixel);
      rectObj.Pen = new AnnPen(Color.Blue, new AnnLength(1, AnnUnit.Pixel));
      rectObj.Brush = new AnnSolidBrush(Color.Yellow);
      myContainer.Objects.Add(rectObj);

      // intitialize a new PrintDocument object
      if(PrinterSettings.InstalledPrinters != null && PrinterSettings.InstalledPrinters.Count > 0)
      {
         PrintDocument printDocument = new PrintDocument();
         printDocument.PrintPage += new PrintPageEventHandler(PrintDocument_PrintPage);
         printDocument.Print();
      }

      // dispose the image
      myImage.Dispose();
   }

   private void PrintDocument_PrintPage(object sender, PrintPageEventArgs e)
   {
      AnnPrinter printer = new AnnPrinter();

      // We want normal size (not zoomed) but centered
      printer.SizeMode = RasterPaintSizeMode.Fit;
      printer.HorizontalAlignMode = RasterPaintAlignMode.Center;
      printer.VerticalAlignMode = RasterPaintAlignMode.Center;

      // print the whole image
      printer.ImageRectangle = Rectangle.Empty;

      // use maximum page
      printer.PageRectangle = RectangleF.Empty;

      // Win32 GDI printing and scale to gray
      RasterPaintProperties props = RasterPaintProperties.Default;
      props.PaintEngine = RasterPaintEngine.Gdi;
      props.PaintDisplayMode |= RasterPaintDisplayModeFlags.ScaleToGray;
      printer.PaintProperties = props;
      printer.Print(myImage, myImage.Page, myContainer,e);
   }

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

Target Platforms: Windows 7, Windows Vista SP1 or later, Windows XP SP3, Windows Server 2008 (Server Core not supported), Windows Server 2008 R2 (Server Core supported with SP1 or later), Windows Server 2003 SP2

Reference

AnnPrinter Members
Leadtools.Annotations Namespace