Leadtools.Annotations Namespace > AnnObject Class : ConvertObjectToLogicalPoints Method |
public AnnPoint[] ConvertObjectToLogicalPoints( AnnPoint[] points )
'Declaration Public Function ConvertObjectToLogicalPoints( _ ByVal points() As AnnPoint _ ) As AnnPoint()
'Usage Dim instance As AnnObject Dim points() As AnnPoint Dim value() As AnnPoint value = instance.ConvertObjectToLogicalPoints(points)
public: array<AnnPoint>^ ConvertObjectToLogicalPoints( array<AnnPoint>^ points )
An AnnObject may contain various points, lines, curves and rectangles that denote the object coordinates and where it should be drawn on an image. Also, the AnnObject contains a System.Drawing.Drawing2D.Matrix object that may be updated with a transformation when the object is moved, rotated or sized. This transformation as well as the container own transformation are used to translate an object point to image coordinates and then to the screen.
The coordinates stored in the object (for example, AnnLineObject.StartPoint or AnnRectangleObject.Bounds are called object coordinates. These coordinates do not translate 1 to 1 to pixel values on the image used in the annotations because of the transformation matrices involved.
The values corresponding to the object coordinates in pixels are called logical coordinates. For example, a logical coordinate of AnnLineObject.StartPoint is its pixel value (in top left-position) in the image its annotating. Converting from object to logical coordinates is what happens when you call the AnnAutomation.Realize method.
To manipulate an object position and size manually from outside the annotation framework, you need to first convert its coordinates to logical values, perform your own transformations, convert them back to object coordinates before setting them back to the object.
To convert a point or a group of points from object to logical coordinates, use the ConvertObjectToLogicalPoints method.
To convert a point or a group of points from logical to object coordinates, use the ConvertLogicalToObjectPoints method.
To convert a rectangle from object to logical coordinates, use the ConvertObjectToLogicalRectangle method.
To convert a rectangle from logical to object coordinates, use the ConvertLogicalToObjectRectangle method.
For an example on converting object to logical and back to object coordinates, refer to ConvertLogicalToObjectPoints.
Imports Leadtools Imports Leadtools.Annotations Imports Leadtools.Codecs Imports Leadtools.WinForms Imports Leadtools.Drawing Private Sub BurnAllLinesAndRectanglesToImage(ByVal automation As AnnAutomation) ' Create a Graphics object from the RasterImage we are annotating Dim hdc As IntPtr = RasterImagePainter.CreateLeadDC(automation.Viewer.Image) Using g As Graphics = Graphics.FromHdc(hdc) ' Loop through all the objects in the annotation container For Each annObj As AnnObject In automation.Container.Objects If (TypeOf annObj Is AnnLineObject) Then Dim lineObj As AnnLineObject = DirectCast(annObj, AnnLineObject) ' Burn this line object in RED ' Convert the line points to logical (image coordinates) Dim pts() As AnnPoint = {lineObj.StartPoint, lineObj.EndPoint} pts = lineObj.ConvertObjectToLogicalPoints(pts) ' Convert the points to pixels Dim pt1Pixels As PointF = pts(0).ConvertTo(automation.Container.UnitConverter, AnnUnit.Pixel).ToPointF() Dim pt2Pixels As PointF = pts(1).ConvertTo(automation.Container.UnitConverter, AnnUnit.Pixel).ToPointF() ' Draw it on the image g.DrawLine(Pens.Red, pt1Pixels, pt2Pixels) ElseIf (TypeOf annObj Is AnnRectangleObject) Then Dim rectObj As AnnRectangleObject = DirectCast(annObj, AnnRectangleObject) ' Burn this rectangle object in BLUE ' Convert the rectangle bounds to logical (image coordinates) Dim bounds As AnnRectangle = rectObj.ConvertObjectToLogicalRectangle(rectObj.Bounds) ' Convert the bounds to pixels Dim boundsPixels As RectangleF = bounds.ConvertTo(automation.Container.UnitConverter, AnnUnit.Pixel).ToRectangleF() ' Draw it on the image g.DrawRectangle(Pens.Blue, boundsPixels.X, boundsPixels.Y, boundsPixels.Width - 1, boundsPixels.Height - 1) End If Next End Using RasterImagePainter.DeleteLeadDC(hdc) ' Invalidate automation.Viewer.Invalidate() End Sub
using Leadtools; using Leadtools.Annotations; using Leadtools.Codecs; using Leadtools.WinForms; using Leadtools.Drawing; private void BurnAllLinesAndRectanglesToImage(AnnAutomation automation) { // Create a Graphics object from the RasterImage we are annotating IntPtr hdc = RasterImagePainter.CreateLeadDC(automation.Viewer.Image); using (Graphics g = Graphics.FromHdc(hdc)) { // Loop through all the objects in the annotation container foreach(AnnObject annObj in automation.Container.Objects) { if(annObj is AnnLineObject) { AnnLineObject lineObj = annObj as AnnLineObject; // Burn this line object in RED // Convert the line points to logical (image coordinates) AnnPoint[] pts = { lineObj.StartPoint, lineObj.EndPoint }; pts = lineObj.ConvertObjectToLogicalPoints(pts); // Convert the points to pixels PointF pt1Pixels = pts[0].ConvertTo(automation.Container.UnitConverter, AnnUnit.Pixel).ToPointF(); PointF pt2Pixels = pts[1].ConvertTo(automation.Container.UnitConverter, AnnUnit.Pixel).ToPointF(); // Draw it on the image g.DrawLine(Pens.Red, pt1Pixels, pt2Pixels); } else if(annObj is AnnRectangleObject) { AnnRectangleObject rectObj = annObj as AnnRectangleObject; // Burn this rectangle object in BLUE // Convert the rectangle bounds to logical (image coordinates) AnnRectangle bounds = rectObj.ConvertObjectToLogicalRectangle(rectObj.Bounds); // Convert the bounds to pixels RectangleF boundsPixels = bounds.ConvertTo(automation.Container.UnitConverter, AnnUnit.Pixel).ToRectangleF(); // Draw it on the image g.DrawRectangle(Pens.Blue, boundsPixels.X, boundsPixels.Y, boundsPixels.Width - 1, boundsPixels.Height - 1); } } } RasterImagePainter.DeleteLeadDC(hdc); // Invalidate automation.Viewer.Invalidate(); }