ActiveReports 18 .NET Edition
MESCIUS.ActiveReports Assembly / GrapeCity.ActiveReports.SectionReportModel Namespace / Style Class / FontName Property
Example

In This Topic
    FontName Property (Style)
    In This Topic
    Gets or sets the Font.Name property of the control.  Null if the property is inherited from the Style parent or not to be set on the control.
    Syntax
    'Declaration
     
    Public Property FontName As Object
    public object FontName {get; set;}

    Property Value

    The name of the font that should be used to render the control text.

    Example
    Paste inside the ReportStart event.
    private void SectionReport1_ReportStart(object sender, System.EventArgs eArgs)
    {
        this.StyleSheet.Add("MyStyle");
        this.StyleSheet["MyStyle"].Alignment = TextAlignment.Center;
        this.StyleSheet["MyStyle"].BackColor = System.Drawing.Color.White;
        this.StyleSheet["MyStyle"].FontBold = true;
        this.StyleSheet["MyStyle"].FontItalic = false;
        this.StyleSheet["MyStyle"].FontName = "Arial";
        this.StyleSheet["MyStyle"].FontSize = null;
        this.StyleSheet["MyStyle"].FontStrikeThrough = false;
        this.StyleSheet["MyStyle"].FontUnderline = false;
        this.StyleSheet["MyStyle"].ForeColor = System.Drawing.Color.YellowGreen;
        Console.WriteLine(this.StyleSheet["MyStyle"].Name.ToString());
        Console.WriteLine(this.StyleSheet["MyStyle"].Value.ToString());
        this.StyleSheet["MyStyle"].VerticalAlignment = VerticalTextAlignment.Middle;
    
        Label1.ClassName = "MyStyle";
    
        if (this.StyleSheet.Count > 10)
        {
            this.StyleSheet.Remove("MyStyle");
        }
    }
    Paste inside the ReportStart event.
    Private Sub SectionReport1_ReportStart(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.ReportStart
       Me.StyleSheet.Add("MyStyle")
       Me.StyleSheet("MyStyle").Alignment = TextAlignment.Center
       Me.StyleSheet("MyStyle").BackColor = System.Drawing.Color.White
       Me.StyleSheet("MyStyle").FontBold = True
       Me.StyleSheet("MyStyle").FontItalic = False
       Me.StyleSheet("MyStyle").FontName = "Arial"
       Me.StyleSheet("MyStyle").FontSize = Nothing
       Me.StyleSheet("MyStyle").FontStrikeThrough = False
       Me.StyleSheet("MyStyle").FontUnderline = False
       Me.StyleSheet("MyStyle").ForeColor = System.Drawing.Color.YellowGreen
       Console.WriteLine(Me.StyleSheet("MyStyle").Name.ToString())
       Console.WriteLine(Me.StyleSheet("MyStyle").Value.ToString())
       Me.StyleSheet("MyStyle").VerticalAlignment = VerticalTextAlignment.Middle
    
       Label1.ClassName = "MyStyle"
    
       If Me.StyleSheet.Count > 10 Then
           Me.StyleSheet.Remove("MyStyle")
       End If
    
    End Sub
    See Also