ToolsCollection Class

Encapsulates a collection of Tool objects for use by the Toolbar class.

For a list of all members of this type, see ToolsCollection members.

Object Model

Inheritance Hierarchy

System.Object
System.Collections.CollectionBase
DataDynamics.ActiveReports.Toolbar.ToolsCollection

Syntax

[Visual Basic]
Public Class ToolsCollection 
   Inherits CollectionBase

[C#]
public class ToolsCollection : CollectionBase

Remarks

The ToolsCollection is a zero-based indexed collection used by the Toolbar class to hold all the Tool objects assigned to the toolbar.

Example

[C#]

private void arv_Load(object sender, System.EventArgs e) 
{ 
    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; 
 
    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")); 
 
    DataDynamics.ActiveReports.Toolbar.Toolbar t = new DataDynamics.ActiveReports.Toolbar.Toolbar(); 
    t.DisplayToolTips = true; 
    t.Images = i; 
    t.Parent = arv.Parent; 
    t.Tools.Add(b); 
    t.Wrappable = true; 
 
    rptDD rpt = new rptDD(); 
    rpt.Run(); 
    arv.Document = rpt.Document; 
}

[Visual Basic]

Private Sub arv_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles arv.Load

    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 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.DisplayToolTips = True

    t.Images = i

    t.Parent = arv.Parent

    t.Tools.Add(b)

    t.Wrappable = True



    Dim rpt As New rptDD

    rpt.Run()

    arv.Document = rpt.Document

End Sub

See Also

Language