バージョン

Control プロパティ (TaskPaneTool)

ControlContainerTool にアタッチされた Control を返します。
シンタックス
'宣言
 
Public Overrides Property Control As Control
public override Control Control {get; set;}
解説

このプロパティは、ControlContainer 内のコントロールへの参照を返します。このプロパティを使用して、ControlContainer ツールによって含まれるコントロールの任意のプロパティまたはメソッドにアクセスすることができます。

使用例
Imports Infragistics.Shared
Imports Infragistics.Win
Imports Infragistics.Win.UltraWinToolbars

	Private Sub UltraButton1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles UltraButton1.Click
		' create a new task pane toolbar
		Dim taskPaneToolbar As New UltraTaskPaneToolbar("TaskPane")
		Me.UltraToolbarsManager1.Toolbars.Add(taskPaneToolbar)

		' creates some task pane tools
		Dim taskPaneTool As New TaskPaneTool("Button")
		Dim taskPaneTool2 As New TaskPaneTool("RichText")

		' add the tool to the manager and then create an instance
		' on the toolbar
		Me.UltraToolbarsManager1.Tools.Add(taskPaneTool)
		Me.UltraToolbarsManager1.Tools.Add(taskPaneTool2)
		taskPaneToolbar.Tools.AddTool("Button")
		taskPaneToolbar.Tools.AddTool("RichText")

		' the HeaderCaption is displayed in the header area of the 
		' taskpane toolbar when this tool is selected
		taskPaneTool.HeaderCaption = "Button"

		' the Caption is displayed in the menu of the task pane
		' toolbar and is also used as the default header caption
		taskPaneTool.SharedProps.Caption = "Button Menu Caption"

		' the following determines whether the control should receive
		' focus when the tool is selected
		taskPaneTool.AutoActivateControl = True

		' create a control to host in the task pane toolbar when
		' the tool is selected
		Dim btn As New Button()
		btn.Visible = False		  ' hide it by default
		btn.Text = "Press"
		Me.Controls.Add(btn)
		taskPaneTool.Control = btn

		taskPaneTool2.SharedProps.Caption = "RichTextBox"

		Dim rtb As New RichTextBox()
		rtb.Visible = False		  ' hide it by default
		AddHandler rtb.TextChanged, AddressOf Me.OnRichTextChanged
		Me.Controls.Add(rtb)
		taskPaneTool2.Control = rtb
	End Sub

	Private Sub OnRichTextChanged(ByVal sender As Object, ByVal e As EventArgs)
		Dim rtb As RichTextBox = CType(sender, RichTextBox)
		Dim tool As TaskPaneTool = CType(Me.UltraToolbarsManager1.GetToolThatContainsControl(rtb), TaskPaneTool)

		If Not (tool Is Nothing) Then
			tool.HeaderCaption = "RichTextBox - " & rtb.TextLength
		End If
	End Sub	'OnRichTextChanged
using Infragistics.Shared;
using Infragistics.Win;
using Infragistics.Win.UltraWinToolbars;

		private void ultraButton1_Click(object sender, System.EventArgs e)
		{
			// create a new task pane toolbar
			UltraTaskPaneToolbar taskPaneToolbar = new UltraTaskPaneToolbar("TaskPane");
			this.ultraToolbarsManager1.Toolbars.Add(taskPaneToolbar);

			// creates some task pane tools
			TaskPaneTool taskPaneTool = new TaskPaneTool("Button");
			TaskPaneTool taskPaneTool2 = new TaskPaneTool("RichText");

			// add the tool to the manager and then create an instance
			// on the toolbar
			this.ultraToolbarsManager1.Tools.Add(taskPaneTool);
			this.ultraToolbarsManager1.Tools.Add(taskPaneTool2);
			taskPaneToolbar.Tools.AddTool("Button");
			taskPaneToolbar.Tools.AddTool("RichText");

			// the HeaderCaption is displayed in the header area of the 
			// taskpane toolbar when this tool is selected
			taskPaneTool.HeaderCaption = "Button";
				
			// the Caption is displayed in the menu of the task pane
			// toolbar and is also used as the default header caption
			taskPaneTool.SharedProps.Caption = "Button Menu Caption";

			// the following determines whether the control should receive
			// focus when the tool is selected
			taskPaneTool.AutoActivateControl = true;

			// create a control to host in the task pane toolbar when
			// the tool is selected
			Button btn = new Button();
			btn.Visible = false;	// hide it by default
			btn.Text = "Press";
			this.Controls.Add(btn);
			taskPaneTool.Control = btn;

			taskPaneTool2.SharedProps.Caption = "RichTextBox";

			RichTextBox rtb = new RichTextBox();
			rtb.Visible = false;	// hide it by default
			rtb.TextChanged += new EventHandler(this.OnRichTextChanged);
			this.Controls.Add(rtb);
			taskPaneTool2.Control = rtb;
		}

		private void OnRichTextChanged(object sender, EventArgs e)
		{
			RichTextBox rtb = sender as RichTextBox;

			TaskPaneTool tool = this.ultraToolbarsManager1.GetToolThatContainsControl(rtb) as TaskPaneTool;

			if (tool != null)
				tool.HeaderCaption = "RichTextBox - " + rtb.TextLength;
		}
参照