TextPane2.Collection 属性
获取包含支持此属性的 TextPane 对象的集合。
命名空间: EnvDTE80
程序集: EnvDTE80(在 EnvDTE80.dll 中)
语法
声明
ReadOnly Property Collection As TextPanes
Get
TextPanes Collection { get; }
property TextPanes^ Collection {
TextPanes^ get ();
}
abstract Collection : TextPanes
function get Collection () : TextPanes
属性值
类型:EnvDTE.TextPanes
一个 TextPanes 集合。
实现
示例
此示例打开一个文本文档,并使用文本窗格的 Collection 属性在消息框中显示活动窗口的标题。 有关如何作为外接程序运行此示例的更多信息,请参见 如何:编译和运行自动化对象模型代码示例。
Imports EnvDTE
Imports EnvDTE80
Public Sub OnConnection(ByVal application As Object, _
ByVal connectMode As ext_ConnectMode, ByVal addInInst As Object, _
ByRef custom As Array) Implements IDTExtensibility2.OnConnection
_applicationObject = CType(application, DTE2)
_addInInstance = CType(addInInst, AddIn)
TextPane2CollectionExample(_applicationObject)
End Sub
Sub TextPane2CollectionExample(ByVal dte As DTE2)
Dim objTW As TextWindow
Dim objPane As TextPane2
Dim objTextDoc As TextDocument
Dim objTextPt As TextPoint
Dim objEP As EditPoint
' Create a new text document.
_applicationObject.ItemOperations.NewFile("General\Text File")
' Get a handle to the new document and create EditPoint,
' TextPoint, and TextPane objects.
objTextDoc = CType(_applicationObject.ActiveDocument.Object _
("TextDocument"), TextDocument)
objEP = objTextDoc.StartPoint.CreateEditPoint
objTextPt = objTextDoc.StartPoint
' Plug in some text.
objEP.Insert("A test sentence.")
objTW = CType(dte.ActiveWindow.Object, TextWindow)
objPane = CType(objTW.ActivePane, TextPane2)
For Each textPane As TextPane2 In objPane.Collection
MsgBox("The caption of the TextPane2 window in the _
TextPane2 collection is:" & vbCr & textPane.Window.Caption)
Next
End Sub
using EnvDTE;
using EnvDTE80;
using System.Windows.Forms;
public void OnConnection(object application,
ext_ConnectMode connectMode, object addInInst, ref Array custom)
{
_applicationObject = (DTE2)application;
_addInInstance = (AddIn)addInInst;
TextPane2CollectionExample(_applicationObject);
}
public void TextPane2CollectionExample(DTE2 dte)
{
TextWindow objTW;
TextPane2 objPane;
TextDocument objTextDoc;
TextPoint objTextPt;
EditPoint2 objEP;
// Create a new text document.
_applicationObject.ItemOperations.NewFile
(@"General\Text File", "test.txt", Constants.vsViewKindTextView);
// Get a handle to the text document and create EditPoint2,
// TextPoint, and TextPane2 objects.
objTextDoc =(TextDocument)_applicationObject.ActiveDocument.Object
("TextDocument");
objEP = (EditPoint2)objTextDoc.StartPoint.CreateEditPoint();
objTextPt = objTextDoc.StartPoint;
// Plug in some text.
objEP.Insert("A test sentence.");
objTW = (TextWindow)_applicationObject.ActiveWindow.Object;
objPane = (TextPane2)objTW.ActivePane;
foreach (TextPane2 textPane in objPane.Collection)
{
MessageBox.Show("The caption of the TextPane2 window in
the TextPane2 collection is:" + "\n" + textPane.Window.Caption);
}
}
.NET Framework 安全性
- 对直接调用方的完全信任。此成员不能由部分信任的代码使用。有关更多信息,请参见通过部分受信任的代码使用库。