Imports Leadtools
Imports Leadtools.Annotations
Imports Leadtools.Codecs
Imports Leadtools.WinForms
Public Sub AnnCodecs_AnnCodecs(ByVal fileName As String)
' create a new annotation container
Dim container As AnnContainer = New AnnContainer()
' add a few objects into the container
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 = Nothing
container.Objects.Add(rectObj)
Dim lineObj As AnnLineObject = New AnnLineObject()
lineObj.StartPoint = New AnnPoint(100, 100, AnnUnit.Pixel)
lineObj.EndPoint = New AnnPoint(200, 200, AnnUnit.Pixel)
lineObj.Pen = New AnnPen(Color.Red, New AnnLength(1, AnnUnit.Pixel))
container.Objects.Add(lineObj)
' create a new AnnCodecs class
Dim codecs As AnnCodecs = New AnnCodecs()
' save this container into a file
' save the objects in this container
codecs.Save(fileName, container, AnnCodecsFormat.Serialize, 1, AnnCodecsSavePageMode.Overwrite)
' get information about the file
Dim information As AnnCodecsInformation = New AnnCodecsInformation()
codecs.GetInformation(fileName, information)
MessageBox.Show(String.Format("Format: {0}, Number of pages: {1}", information.Format, information.Pages))
' save the objects again (as a second page)
codecs.Save(fileName, container, AnnCodecsFormat.Serialize, 2, AnnCodecsSavePageMode.Insert)
' get information about the file
information = New AnnCodecsInformation()
codecs.GetInformation(fileName, information)
MessageBox.Show(String.Format("Format: {0}, Number of pages: {1}", information.Format, information.Pages))
' delete the first page
codecs.DeletePage(fileName, 1)
' get information about the file
information = New AnnCodecsInformation()
codecs.GetInformation(fileName, information)
MessageBox.Show(String.Format("Format: {0}, Number of pages: {1}", information.Format, information.Pages))
End Sub
using Leadtools;
using Leadtools.Annotations;
using Leadtools.Codecs;
using Leadtools.WinForms;
public void AnnCodecs_AnnCodecs(string fileName)
{
// create a new annotation container
AnnContainer container = new AnnContainer();
// add a few objects into the container
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 = null;
container.Objects.Add(rectObj);
AnnLineObject lineObj = new AnnLineObject();
lineObj.StartPoint = new AnnPoint(100, 100, AnnUnit.Pixel);
lineObj.EndPoint = new AnnPoint(200, 200, AnnUnit.Pixel);
lineObj.Pen = new AnnPen(Color.Red, new AnnLength(1, AnnUnit.Pixel));
container.Objects.Add(lineObj);
// create a new AnnCodecs class
AnnCodecs codecs = new AnnCodecs();
// save this container into a file
// save the objects in this container
codecs.Save(fileName, container, AnnCodecsFormat.Serialize, 1, AnnCodecsSavePageMode.Overwrite);
// get information about the file
AnnCodecsInformation information = new AnnCodecsInformation();
codecs.GetInformation(fileName, information);
MessageBox.Show(String.Format("Format: {0}, Number of pages: {1}", information.Format, information.Pages));
// save the objects again (as a second page)
codecs.Save(fileName, container, AnnCodecsFormat.Serialize, 2, AnnCodecsSavePageMode.Insert);
// get information about the file
information = new AnnCodecsInformation();
codecs.GetInformation(fileName, information);
MessageBox.Show(String.Format("Format: {0}, Number of pages: {1}", information.Format, information.Pages));
// delete the first page
codecs.DeletePage(fileName, 1);
// get information about the file
information = new AnnCodecsInformation();
codecs.GetInformation(fileName, information);
MessageBox.Show(String.Format("Format: {0}, Number of pages: {1}", information.Format, information.Pages));
}