ActiveReports 14 .NET Edition
GrapeCity.ActiveReports.Document Assembly / GrapeCity.ActiveReports.Document.Section.Annotations Namespace / AnnotationLine Class / Font Property
Example

In This Topic
    Font Property (AnnotationLine)
    In This Topic
    Gets or sets the font for the text of the AnnotationLine object.
    Syntax
    'Declaration
     
    Public Property Font As Font
    public Font Font {get; set;}

    Property Value

    The font.
    Example
    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.Font = new Font("Arial", 12f, FontStyle.Bold);
        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; 
    }
    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