|
This code snippet is taken from Annotations.cs line 1746 in the
Annotations example project.
Dim annot As New TextMarkupAnnotationElement(AnnotationElement.Object)
annot.EntrySubtype = markupType
annot.EntryQuadPoints = Array.ConvertAll(quadPoints.Split(New Char() { " "c }), Function(s) Double.Parse(s, NumberFormatInfo.InvariantInfo))
AnnotationElement = annot
Color = color
This code snippet is taken from Annotations.cs line 1767 in the
Annotations example project.
XRect rect = new XRect(Form.Doc.GetInfo(id, "Rect"));
TextMarkupAnnotationElement annot = new TextMarkupAnnotationElement(AnnotationElement.Object);
annot.EntrySubtype = markupType;
annot.EntryQuadPoints = new double[] { rect.Left, rect.Top, rect.Right, rect.Top, rect.Left, rect.Bottom, rect.Right, rect.Bottom };
annot.EntryRect = new RectangleElement(ArrayAtom.FromXRect(rect), annot.Host);
AnnotationElement = annot;
Color = color;
Dim rect As New XRect(Form.Doc.GetInfo(id, "Rect"))
Dim annot As New TextMarkupAnnotationElement(AnnotationElement.Object)
annot.EntrySubtype = markupType
annot.EntryQuadPoints = New Double() { rect.Left, rect.Top, rect.Right, rect.Top, rect.Left, rect.Bottom, rect.Right, rect.Bottom }
annot.EntryRect = New RectangleElement(ArrayAtom.FromXRect(rect), annot.Host)
AnnotationElement = annot
Color = color
This code snippet is taken from Annotations.cs line 1784 in the
Annotations example project.
Dim rect As XRect = Form.Doc.Rect
Dim annot As New TextMarkupAnnotationElement(AnnotationElement.Object)
annot.EntrySubtype = markupType
annot.EntryQuadPoints = New Double() { rect.Left, rect.Top, rect.Right, rect.Top, rect.Left, rect.Bottom, rect.Right, rect.Bottom }
annot.EntryRect = New RectangleElement(ArrayAtom.FromXRect(rect), annot.Host)
AnnotationElement = annot
Color = color
|
|
|