Imports Leadtools
Imports Leadtools.Annotations
Imports Leadtools.Codecs
Imports Leadtools.WinForms
Private Sub AnnLength_AnnLength()
' set up a new unit converter with 96 DPI
Dim converter As AnnUnitConverter = New AnnUnitConverter(96, 96)
' create a new annotation length with 1.5 inches
Dim ln As AnnLength = New AnnLength(1.5F, AnnUnit.Inch)
' show the length
Dim s As String = String.Format("{0}", ln)
MessageBox.Show(s)
' convert the length to pixels;
ln.Convert(converter, AnnUnit.Pixel)
' show
s = String.Format("{0}", ln)
MessageBox.Show(s)
End Sub
using Leadtools;
using Leadtools.Annotations;
using Leadtools.Codecs;
using Leadtools.WinForms;
private void AnnLength_AnnLength()
{
// set up a new unit converter with 96 DPI
AnnUnitConverter converter = new AnnUnitConverter(96, 96);
// create a new annotation length with 1.5 inches
AnnLength ln = new AnnLength(1.5F, AnnUnit.Inch);
// show the length
string s = string.Format("{0}", ln);
MessageBox.Show(s);
// convert the length to pixels;
ln.Convert(converter, AnnUnit.Pixel);
// show
s = string.Format("{0}", ln);
MessageBox.Show(s);
}