ActiveReports 6 Online Help
ContextMenu Property (ToolbarObject)
Example 

Gets or sets a context menu to use when the user right-clicks on the toolbar.
Syntax
'Declaration
 
Public Property ContextMenu As ContextMenu
public ContextMenu ContextMenu {get; set;}

Property Value

A ContextMenu value that represents the context menu to be used for the toolbar.
Example
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 a toolbar
    DataDynamics.ActiveReports.Viewer.ToolbarObject t = new DataDynamics.ActiveReports.Viewer.ToolbarObject(arv);
    t.ContextMenu = cm;
    t.DisplayToolTips = true;
    t.Enabled = true;
    t.Font = f;

    //create an imagelist
    ImageList i = new ImageList();
    i.Images.Add(Image.FromFile("c:\\icons\\Open16x16.ico"));
    i.Images.Add(Image.FromFile("c:\\icons\\Save16x16.ico"));
    t.Images = i;

    t.Tools.AddRange(arr);
    t.Visible = true;
}
Private Sub arv_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles arv.Load
    'run a report and display it in the viewer
    Dim rpt As New rptDD()
    rpt.Run()
    arv.Document = rpt.Document

    'create an array of tools
    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


    'create a context menu
    Dim cm As New ContextMenu()
    cm.MenuItems.Add("Hide")

    'create a font
    Dim f As New Font("Times New Roman", 12)

    'create a toolbar
    Dim t As New DataDynamics.ActiveReports.Viewer.ToolbarObject(arv)
    t.ContextMenu = cm
    t.DisplayToolTips = True
    t.Enabled = True
    t.Font = f

    'create an imagelist
    Dim i As New ImageList
    i.Images.Add(Image.FromFile("c:\icons\Open16x16.ico"))
    i.Images.Add(Image.FromFile("c:\icons\Save16x16.ico"))
    t.Images = i

    t.Tools.AddRange(arr)
    t.Visible = True
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

ToolbarObject Class
ToolbarObject Members

Send Feedback