GrapeCity.ActiveReports.v9 Assembly > GrapeCity.ActiveReports.SectionReportModel Namespace > Style Class : FontName Property |
'Declaration Public Property FontName As System.Object
public System.object FontName {get; set;}
The name of the font that should be used to render the control text.
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"); } }
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