Determines whether the toolbar should wrap tools to an additional row when they do not fit on a single row.
Syntax
Visual Basic (Declaration) | |
---|
Public Property Wrappable As Boolean |
Visual Basic (Usage) | Copy Code |
---|
Dim instance As ToolbarObject
Dim value As Boolean
instance.Wrappable = value
value = instance.Wrappable
|
C# | |
---|
public bool Wrappable {get; set;} |
Return Value
A Boolean value.
True if the toolbar should wrap the tools; otherwise,
False.
Example
C# | Copy Code |
---|
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 an imagelist
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"));
//create a toolbar
DataDynamics.ActiveReports.Toolbar.Toolbar t = new DataDynamics.ActiveReports.Toolbar.Toolbar();
t.ContextMenu = cm;
t.DisplayToolTips = true;
t.Enabled = true;
t.Font = f;
t.Images = i;
t.Parent = arv.Parent;
t.Tools.AddRange(arr);
t.Visible = true;
t.Wrappable = true;
} |
Visual Basic | Copy Code |
---|
Private Sub arv_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles arv.Load
Dim rpt As New rptDD
rpt.Run()
arv.Document = rpt.Document
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 cm As New ContextMenu
cm.MenuItems.Add("Hide")
Dim f As New Font("Times New Roman", 12)
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.ContextMenu = cm
t.DisplayToolTips = True
t.Enabled = True
t.Font = f
t.Images = i
t.Parent = arv.Parent
t.Tools.AddRange(arr)
t.Visible = True
t.Wrappable = True
End Sub |
See Also