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

Glossary Item Box

Gets or sets the location on the AnnotationLine that displays arrow caps.

Syntax

Visual Basic (Declaration) 
Public Property ShowArrowCaps As AnnotationLine.ShowArrowCap
C# 
public AnnotationLine.ShowArrowCap ShowArrowCaps {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