Adds a collection of toolbar tools to this toolbar tool collection.

Syntax

Visual Basic (Declaration)
Public Sub AddRange( _ ByVal avalue() As Tool _ )

Visual Basic (Usage)	Copy Code
`Dim instance As ToolsCollection Dim avalue() As Tool instance.AddRange(avalue)`

C#
public void AddRange( Tool[] avalue )

Parameters

avalue: The collection of toolbar tools to be added to this ToolsCollection contained in an array.

Example

C# Copy Code

C#	Copy Code
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.Toolbar.Toolbar t = new DataDynamics.ActiveReports.Toolbar.Toolbar(); t.DisplayToolTips = true; t.Images = i; t.Parent = arv.Parent; t.Tools.AddRange(arr); t.Wrappable = true; rptDD rpt = new rptDD(); rpt.Run(); arv.Document = rpt.Document; }

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.Toolbar.Toolbar t = new DataDynamics.ActiveReports.Toolbar.Toolbar();

   t.DisplayToolTips = true;

   t.Images = i;

   t.Parent = arv.Parent;

   t.Tools.AddRange(arr);

   t.Wrappable = true;



   rptDD rpt = new rptDD();

   rpt.Run();

   arv.Document = rpt.Document;

}

Visual Basic Copy Code

Visual Basic	Copy Code
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.Toolbar.Toolbar t.DisplayToolTips = True t.Images = i t.Parent = arv.Parent t.Tools.AddRange(arr) t.Wrappable = True Dim rpt As New rptDD rpt.Run() arv.Document = rpt.Document End Sub

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.Toolbar.Toolbar

    t.DisplayToolTips = True

    t.Images = i

    t.Parent = arv.Parent

    t.Tools.AddRange(arr)

    t.Wrappable = True



    Dim rpt As New rptDD

    rpt.Run()

    arv.Document = rpt.Document

End Sub

ActiveReports.Viewer3	Request technical support
AddRange Method
See Also Example

Syntax

Parameters

Example

See Also

Reference