ActiveReports Developer 7
LineLocation Property
See Also  Example
GrapeCity.ActiveReports.Document.v7 Assembly > GrapeCity.ActiveReports.Document.Section.Annotations Namespace > AnnotationLine Class : LineLocation Property

Glossary Item Box

Gets or sets the location of the AnnotationLine within the Annotation object. The three possible values are Top, Middle, and Bottom.

Syntax

Visual Basic (Declaration) 
Public Property LineLocation As AnnotationLine.LinePlacement
C# 
public AnnotationLine.LinePlacement LineLocation {get; set;}

Example

C#Copy Code
using GrapeCity.ActiveReports.Document.Section.Annotations;  
  
private void AddAnnotations()  
{  
    rptAnno rpt = new rptAnno();  
    rpt.Run();  
    this.viewer1.Document = rpt.Document;  
  
    AnnotationLine line = new AnnotationLine();  
    line.ArrowCapWidth = 4.5f;  
    line.ArrowCapHeight = 4.5f;  
    line.DashStyle = System.Drawing.Drawing2D.DashStyle.DashDotDot;  
    line.DashCap = System.Drawing.Drawing2D.DashCap.Round;  
    line.ShowArrowCaps = AnnotationLine.ShowArrowCap.RightOnly;  
    line.FillArrowCaps = true;  
    line.LineColor = Color.Red;  
    line.LineWidth = 1;  
    line.LineLocation = AnnotationLine.LinePlacement.Bottom;  
    line.Text = "Please review.";  
    line.TextColor = Color.Blue;  
    line.TextAlignment = System.Drawing.StringAlignment.Center;  
              
    line.Attach(4, 4);  
    this.viewer1.Document.Pages[0].Annotations.Add(line);  
  
    line.Height = 0.50f;  
    line.Width = 1.5f;  
}
Visual BasicCopy Code
Imports GrapeCity.ActiveReports.Document.Section.Annotations

Private Sub AddAnnotations()
 Dim rpt As rptAnno = New rptAnno
 rpt.Run
 Me.viewer1.Document = rpt.Document

 Dim line As AnnotationLine = New AnnotationLine
 line.ArrowCapWidth = 4.5F
 line.ArrowCapHeight = 4.5F
 line.DashStyle = System.Drawing.Drawing2D.DashStyle.DashDotDot
 line.DashCap = System.Drawing.Drawing2D.DashCap.Round
 line.ShowArrowCaps = AnnotationLine.ShowArrowCap.RightOnly
 line.FillArrowCaps = True
 line.LineColor = Color.Red
 line.LineWidth = 1
 line.LineLocation = AnnotationLine.LinePlacement.Bottom
 line.Text = "Please review."
 line.Font = New Font("Arial", 12F, FontStyle.Bold)
 line.TextColor = Color.Blue
 line.TextAlignment = System.Drawing.StringAlignment.Center

 line.Attach(4, 4)
 Me.viewer1.Document.Pages(0).Annotations.Add(line)

 line.Height = 0.5F
 line.Width = 1.5F
End Sub

See Also