通过

TextPane2.Collection 属性

  • 项目

获取包含支持此属性的 TextPane 对象的集合。

命名空间：  EnvDTE80
程序集：  EnvDTE80（在 EnvDTE80.dll 中）

语法

声明
ReadOnly Property Collection As TextPanes

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 安全性

请参见

参考

TextPane2 接口

Collection 重载

EnvDTE80 命名空间