BindableComponent Class (2003 System)
Provides a default implementation of the IBindableComponent interface.
Namespace: Microsoft.VisualStudio.Tools.Applications.Runtime
Assembly: Microsoft.VisualStudio.Tools.Applications.Runtime (in Microsoft.VisualStudio.Tools.Applications.Runtime.dll)
Syntax
'Declaration
<PermissionSetAttribute(SecurityAction.Demand, Name := "FullTrust")> _
Public MustInherit Class BindableComponent _
Inherits Component _
Implements IBindableComponent, IComponent, IDisposable
'Usage
Dim instance As BindableComponent
[PermissionSetAttribute(SecurityAction.Demand, Name = "FullTrust")]
public abstract class BindableComponent : Component,
IBindableComponent, IComponent, IDisposable
Remarks
Host controls that can be bound to data inherit from this type. It is not intended to be used directly from your code.
Examples
The following code example adds a single cell NamedRange (which derives from BindableComponent), a DataSet with a single column of names, and a Button to the current worksheet. The example uses the DataBindings property to bind the DataSet to the Value2 property of the NamedRange. When the Button is clicked, the example uses the BindingContext property to display the next name in the NamedRange.
Private namedRange1 As Microsoft.Office.Tools.Excel.NamedRange
Private WithEvents button1 As Microsoft.Office.Tools.Excel.Controls.Button
Private customerNames As String() = _
{"Reggie", "Sally", "Henry", "Christine"}
Private ds As DataSet
Private Sub SetBindingContext()
namedRange1 = Me.Controls.AddNamedRange(Me.Range("A1", _
System.Type.Missing), "namedRange1")
' Create a button that scrolls through the data
' displayed in the NamedRange.
button1 = Me.Controls.AddButton(50, 20, 100, 20, "button1")
button1.Text = "Display next item"
' Create a data table with one column.
ds = New DataSet()
Dim table As DataTable = ds.Tables.Add("Customers")
Dim column1 As New DataColumn("Names", GetType(String))
table.Columns.Add(column1)
' Add the names to the table.
Dim row As DataRow
Dim i As Integer
For i = 0 To customerNames.Length - 1
row = table.NewRow()
row("Names") = customerNames(i)
table.Rows.Add(row)
Next i
' Create a new Binding that links the Value2 property
' of the NamedRange and the Names column.
Dim binding1 As New Binding("Value2", ds, "Customers.Names", False)
' Add the DataSet to the bindings of the NamedRange.
namedRange1.DataBindings.Add(binding1)
End Sub
' Displays the next data item in the NamedRange.
Sub button1_Click(ByVal sender As Object, ByVal e As EventArgs) _
Handles button1.Click
If Not (namedRange1.BindingContext Is Nothing) Then
Dim bindingManager1 As BindingManagerBase = _
namedRange1.BindingContext(ds, "Customers")
' Display the next item.
If bindingManager1.Position < bindingManager1.Count - 1 Then
bindingManager1.Position += 1
' Display the first item.
Else
bindingManager1.Position = 0
End If
End If
End Sub
private Microsoft.Office.Tools.Excel.NamedRange namedRange1;
private Microsoft.Office.Tools.Excel.Controls.Button button1;
private string[] customerNames =
{ "Reggie", "Sally", "Henry", "Christine" };
private DataSet ds;
private void SetBindingContext()
{
namedRange1 = this.Controls.AddNamedRange(
this.Range["A1", missing], "namedRange1");
// Create a button that scrolls through the data
// displayed in the NamedRange.
button1 = this.Controls.AddButton(50, 20, 100, 20,
"button1");
button1.Text = "Display next item";
button1.Click += new EventHandler(button1_Click);
// Create a data table with one column.
ds = new DataSet();
DataTable table = ds.Tables.Add("Customers");
DataColumn column1 = new DataColumn("Names", typeof(string));
table.Columns.Add(column1);
// Add the names to the table.
DataRow row;
for (int i = 0; i < customerNames.Length; i++)
{
row = table.NewRow();
row["Names"] = customerNames[i];
table.Rows.Add(row);
}
// Create a new Binding that links the Value2 property
// of the NamedRange and the Names column.
Binding binding1 = new Binding("Value2", ds,
"Customers.Names", false);
// Add the DataSet to the bindings of the NamedRange.
namedRange1.DataBindings.Add(binding1);
}
// Displays the next data item in the NamedRange.
void button1_Click(object sender, EventArgs e)
{
if (namedRange1.BindingContext != null)
{
BindingManagerBase bindingManager1 =
namedRange1.BindingContext[ds, "Customers"];
// Display the next item.
if (bindingManager1.Position < bindingManager1.Count - 1)
{
bindingManager1.Position++;
}
// Display the first item.
else
{
bindingManager1.Position = 0;
}
}
}
Inheritance Hierarchy
System.Object
System.MarshalByRefObject
System.ComponentModel.Component
Microsoft.VisualStudio.Tools.Applications.Runtime.BindableComponent
Thread Safety
Any public static (Shared in Visual Basic) members of this type are thread safe. Any instance members are not guaranteed to be thread safe.