Imports Leadtools
Imports Leadtools.Annotations
Private Sub AnnRectangle_AnnRectangle()
' set up a new unit converter with 96 DPI
Dim converter As AnnUnitConverter = New AnnUnitConverter(96, 96)
' create a new annotation rectangle that is located at 1.5 and 2 inches and has a width, height of 3 and 4 inches.
Dim rc As AnnRectangle = New AnnRectangle(1.5F, 2.0F, 3.0F, 4.0F, AnnUnit.Inch)
' show the rectangle
Dim s As String = String.Format("{0}", rc)
MessageBox.Show(s)
' convert the rectangle to pixels
rc.Convert(converter, AnnUnit.Pixel)
' show
s = String.Format("{0}", rc)
MessageBox.Show(s)
End Sub
using Leadtools;
using Leadtools.Annotations;
private void AnnRectangle_AnnRectangle()
{
// set up a new unit converter with 96 DPI
AnnUnitConverter converter = new AnnUnitConverter(96, 96);
// create a new annotation rectangle that is located at 1.5 and 2 inches and has a width, height of 3 and 4 inches.
AnnRectangle rc = new AnnRectangle(1.5f, 2f, 3f, 4f, AnnUnit.Inch);
// show the rectangle
string s = string.Format("{0}",rc);
MessageBox.Show(s);
// convert the rectangle to pixels
rc.Convert(converter, AnnUnit.Pixel);
// show
s = string.Format("{0}", rc);
MessageBox.Show(s);
}