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

Glossary Item Box

Gets or sets the width of the AnnotationLine object, in inches.

Syntax

Visual Basic (Declaration) 
Public Overrides NotOverridable Property Width As System.Single
C# 
public override System.float Width {get; set;}

Property Value

A float or single value in inches.

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.TextWidth = 1.2f; 
               
    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