Imports Leadtools
Imports Leadtools.Annotations
Public Sub AnnUnitConverter_ConvertHorizontal()
' set up a new unit converter with 96 horizontal and 192 vertical DPI
Dim converter As AnnUnitConverter = New AnnUnitConverter(96, 192)
Dim pixels As Single = 200
' convert using the horizontal DPI
Dim horzInches As Single = converter.ConvertHorizontal(200, AnnUnit.Pixel, AnnUnit.Inch)
' convert using the vertical DPI
Dim vertInches As Single = converter.ConvertVertical(200, AnnUnit.Pixel, AnnUnit.Inch)
' show
Dim s As String = String.Format("{0} {1} is {2} {3} at {4} X DPI{5}{0} {1} is {6} {3} at {7} Y DPI", pixels, AnnUnitConverter.GetUnitAbbreviation(AnnUnit.Pixel), horzInches, AnnUnitConverter.GetUnitAbbreviation(AnnUnit.Inch), converter.DpiX, Environment.NewLine, vertInches, converter.DpiY)
MessageBox.Show(s)
End Sub
using Leadtools;
using Leadtools.Annotations;
public void AnnUnitConverter_ConvertHorizontal()
{
// set up a new unit converter with 96 horizontal and 192 vertical DPI
AnnUnitConverter converter = new AnnUnitConverter(96, 192);
float pixels = 200;
// convert using the horizontal DPI
float horzInches = converter.ConvertHorizontal(200, AnnUnit.Pixel, AnnUnit.Inch);
// convert using the vertical DPI
float vertInches = converter.ConvertVertical(200, AnnUnit.Pixel, AnnUnit.Inch);
// show
string s = string.Format(
"{0} {1} is {2} {3} at {4} X DPI{5}{0} {1} is {6} {3} at {7} Y DPI",
pixels,
AnnUnitConverter.GetUnitAbbreviation(AnnUnit.Pixel),
horzInches,
AnnUnitConverter.GetUnitAbbreviation(AnnUnit.Inch),
converter.DpiX,
Environment.NewLine,
vertInches,
converter.DpiY);
MessageBox.Show(s);
}