ToolById Method

Gets the toolbar tool with the specified ID in the toolbar tools collection.

Syntax

Visual Basic
C#

'Declaration
 
Public Function ToolById( _
   ByVal id As Integer _
) As Tool

public Tool ToolById( 
   int id
)

Parameters

id: ID of the Tool.

Example

private void arv_Load(object sender, System.EventArgs e)
{
    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;

    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.Viewer.ToolbarObject t = new DataDynamics.ActiveReports.Viewer.ToolbarObject(arv);
    t.DisplayToolTips = true;
    t.Images = i;
    t.Tools.AddRange(arr);

    t.Tools.Remove(t.Tools.ToolById(888));

    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 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 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.Viewer.ToolbarObject
    t.DisplayToolTips = True
    t.Images = i
    t.Tools.AddRange(arr)

    t.Tools.Remove(t.Tools.ToolById(888))

    Dim rpt As New rptDD
    rpt.Run()
    arv.Document = rpt.Document
End Sub

Requirements

Target Platforms: Windows 7, Windows Vista SP1 or later, Windows XP SP3, Windows Server 2008 (Server Core not supported), Windows Server 2008 R2 (Server Core supported with SP1 or later), Windows Server 2003 SP2

Reference

ToolsCollection Class
ToolsCollection Members