ActiveReports 6 Online Help
Remove Method (ToolsCollection)
Example 

The Tool to remove from the collection.
Removes a given tool from the toolbar tools collection.
Syntax
'Declaration
 
Public Sub Remove( _
   ByVal value As Tool _
) 
public void Remove( 
   Tool value
)

Parameters

value
The Tool to remove from the collection.
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;
}
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

See Also

Reference

ToolsCollection Class
ToolsCollection Members

Send Feedback