Imports Leadtools
Imports Leadtools.Annotations
Imports Leadtools.Codecs
Imports Leadtools.WinForms
Public Sub AnnLength_Converted()
' set up a new unit converter with 96 DPI
Dim converter As AnnUnitConverter = New AnnUnitConverter(96, 96)
' create a new annotation length of 1.5 inches
Dim ln As AnnLength = New AnnLength(1.5F, AnnUnit.Inch)
' show the length
MessageBox.Show(ln.ToString())
' show the value converted to pixels
Dim s As String = String.Format("Is {0} Pixels", ln.Converted(converter, AnnUnit.Pixel))
MessageBox.Show(s)
End Sub
using Leadtools;
using Leadtools.Annotations;
using Leadtools.Codecs;
using Leadtools.WinForms;
public void AnnLength_Converted()
{
// set up a new unit converter with 96 DPI
AnnUnitConverter converter = new AnnUnitConverter(96, 96);
// create a new annotation length of 1.5 inches
AnnLength ln = new AnnLength(1.5f, AnnUnit.Inch);
// show the length
MessageBox.Show(ln.ToString());
// show the value converted to pixels
string s = string.Format("Is {0} Pixels", ln.Converted(converter, AnnUnit.Pixel));
MessageBox.Show(s);
}