Gets or sets the font used to display text on the toolbar.
[Visual Basic]
Public Property Font As Font
[C#]
public Font Font {get; set;}
Return Type
A Font value that specifies the font used to display text on the toolbar.
Example
[C#]
private void arv_Load(object sender, System.EventArgs e) { //run a report and display it in the viewer rptDD rpt = new rptDD(); rpt.Run(); arv.Document = rpt.Document; //create an array of tools DataDynamics.ActiveReports.Toolbar.Tool[] arr = new DataDynamics.ActiveReports.Toolbar.Tool[2]; DataDynamics.ActiveReports.Toolbar.Button b = new DataDynamics.ActiveReports.Toolbar.Button(); b.ButtonStyle = DataDynamics.ActiveReports.Toolbar.ButtonStyle.Icon; b.Enabled = true; b.Id = 777; b.ImageIndex = 0; b.ToolTip = "Do not click here."; b.Visible = true; DataDynamics.ActiveReports.Toolbar.CheckButton c = new DataDynamics.ActiveReports.Toolbar.CheckButton(); c.ButtonStyle = DataDynamics.ActiveReports.Toolbar.ButtonStyle.TextAndIcon; c.Id = 888; c.ImageIndex = 1; c.ToolTip = "Click here."; arr[0] = b; arr[1] = c; //create a context menu System.Windows.Forms.ContextMenu cm = new ContextMenu(); cm.MenuItems.Add("Hide"); //create a font System.Drawing.Font f = new Font("Times New Roman", 12); //create an imagelist System.Windows.Forms.ImageList i = new ImageList(); i.Images.Add(Image.FromFile("c:\\icons\\Zero Suit.ico")); i.Images.Add(Image.FromFile("c:\\icons\\The Other Band.ico")); //create a toolbar DataDynamics.ActiveReports.Toolbar.Toolbar t = new DataDynamics.ActiveReports.Toolbar.Toolbar(); t.ContextMenu = cm; t.DisplayToolTips = true; t.Enabled = true; t.Font = f; t.Images = i; t.Parent = arv.Parent; t.Tools.AddRange(arr); t.Visible = true; t.Wrappable = true; } |
[Visual Basic]
Private Sub arv_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles arv.Load
Dim rpt As New rptDD
rpt.Run()
arv.Document = rpt.Document
Dim arr(1) As DataDynamics.ActiveReports.Toolbar.Tool
Dim b As New DataDynamics.ActiveReports.Toolbar.Button
b.ButtonStyle = DataDynamics.ActiveReports.Toolbar.ButtonStyle.Icon
b.Enabled = True
b.Id = 777
b.ImageIndex = 0
b.ToolTip = "Do not click here."
b.Visible = True
Dim c As New DataDynamics.ActiveReports.Toolbar.CheckButton
c.ButtonStyle = DataDynamics.ActiveReports.Toolbar.ButtonStyle.TextAndIcon
c.Id = 888
c.ImageIndex = 1
c.ToolTip = "Click here."
arr(0) = b
arr(1) = c
Dim cm As New ContextMenu
cm.MenuItems.Add("Hide")
Dim f As New Font("Times New Roman", 12)
Dim i As New System.Windows.Forms.ImageList
i.Images.Add(Image.FromFile("c:\icons\Zero Suit.ico"))
i.Images.Add(Image.FromFile("c:\icons\The Other Band.ico"))
Dim t As New DataDynamics.ActiveReports.Toolbar.Toolbar
t.ContextMenu = cm
t.DisplayToolTips = True
t.Enabled = True
t.Font = f
t.Images = i
t.Parent = arv.Parent
t.Tools.AddRange(arr)
t.Visible = True
t.Wrappable = True
End Sub |
See Also
ToolbarObject Class
| ToolbarObject Members
Copyright © 2004-2005 Data Dynamics, Ltd. All rights reserved.