Window2.Project 屬性

發行項
10/28/2012

取得與 Window 物件關聯的 Project 物件。

命名空間： EnvDTE80
組件： EnvDTE80 (在 EnvDTE80.dll 中)

語法

'宣告
ReadOnly Property Project As Project

Project Project { get; }

property Project^ Project {
    Project^ get ();
}

abstract Project : Project

function get Project () : Project

屬性值

型別：EnvDTE.Project
Project 物件。

備註

Project 屬性代表項目所屬的專案。

範例

這個範例中，會使文字檔成為使用中視窗。然後會使用這個視窗逐一查看視窗集合，並顯示包含視窗的屬性名稱。

在執行這個範例之前，請先在 Visual Studio 中開啟專案，然後在其中加入名為 "TextFile1.txt" 的文字檔。

如需如何像執行增益集一般，執行這個範例的詳細資訊，請參閱 HOW TO：編譯和執行 Automation 物件模型程式碼範例。

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)
    ProjectExample(_applicationObject)
End Sub
Sub ProjectExample(ByVal dte As DTE2)
    Try
        'Before running, create a text file named 
        ' "TextFile1.txt", include it in your solution,
        ' and make it the active window.
        Dim win As Window2
        Dim doc As Document
        If _applicationObject.Documents.Count > 0 Then
            doc = _applicationObject.Documents.Item("TextFile1.txt")
            win = CType(doc.ActiveWindow, Window2)
            ' Show the name of the project that contains this
            ' window and document.
            MsgBox("The name of the project containing the window: "  _
            & win.Project.Name)
            ' Acticate the winodw.
            win.Activate()
            ' Show the name of the current ProjectITem.
            MsgBox("The name of the current project item is: "  _
            & win.ProjectItem.Name)
            ' How many other windows are available?
            Dim w As String = "Available windows are :" & vbCr
            For Each wi As Window2 In win.Collection
                w = w & wi.Caption & vbCr
            Next
            MsgBox(w)
            ' Determine that the document returned by the 
            ' document property is the same as the document
            ' object doc.
            If win.Document Is doc Then
                MsgBox("The documents match!")
            Else
                MsgBox("The documents do not match.")
            End If
            ' Close the window.
            win.Close(vsSaveChanges.vsSaveChangesNo)
        End If
    Catch ex As Exception
        MsgBox(ex.Message)
    End Try
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;
    ProjectExample(_applicationObject);
}
public void ProjectExample(DTE2 dte)
{
    try
    {
        // Before running, create a text file named 
        // "TextFile1.txt", include it in your solution,
        // and make it the active window.
        Window win;
        Document doc;
        if (dte.Documents.Count > 0)
        {
            doc = dte.Documents.Item("TextFile1.txt");
            win = doc.ActiveWindow;
            // Show the name of the project that contains this 
            // window and document.
            MessageBox.Show(win.Project.Name);
            win.Activate(); // Activate the window
            // Show the name of the current ProjectItem in the window.
            MessageBox.Show("The name of the project containing 
the window: " + win.ProjectItem.Name);
            // How many other windows are available?
            string w = "Available windows are :\n";
            foreach (Window wi in win.Collection)
            {
                w = w + wi.Caption + "\n";
            }
            MessageBox.Show(w);
            // Determine that the document returned by the document 
            // property is the same as the document object 'doc'.
            if (win.Document.Equals(doc))
                MessageBox.Show("The documents match!");
            else
                MessageBox.Show("The documents do not match!");
            // Close the window.
            win.Close(vsSaveChanges.vsSaveChangesNo);
        }
    }
    catch (Exception ex)
    {
        MessageBox.Show(ex.Message);
    }
}