Imports Leadtools
Imports Leadtools.Annotations
Public Sub AnnSize_ConvertedWidth()
' set up a new unit converter with 96 DPI
Dim converter As AnnUnitConverter = New AnnUnitConverter(96, 96)
' create a new annotation size with dimension of 1.5, 2 in inches
Dim sz As AnnSize = New AnnSize(1.5F, 2.0F, AnnUnit.Inch)
Dim s As String
' show the size
s = String.Format("Size is {0}", sz)
MessageBox.Show(s)
' show the width and height components converted to pixels
s = String.Format("width and height is {0}, {1} Pixels", sz.ConvertedWidth(converter, AnnUnit.Pixel), sz.ConvertedHeight(converter, AnnUnit.Pixel))
MessageBox.Show(s)
End Sub
using Leadtools;
using Leadtools.Annotations;
public void AnnSize_ConvertedWidth()
{
// set up a new unit converter with 96 DPI
AnnUnitConverter converter = new AnnUnitConverter(96, 96);
// create a new annotation size with dimension of 1.5, 2 in inches
AnnSize sz = new AnnSize(1.5f, 2f, AnnUnit.Inch);
string s;
// show the size
s = string.Format("Size is {0}", sz);
MessageBox.Show(s);
// show the width and height components converted to pixels
s = string.Format("width and height is {0}, {1} Pixels", sz.ConvertedWidth(converter, AnnUnit.Pixel), sz.ConvertedHeight(converter, AnnUnit.Pixel));
MessageBox.Show(s);
}