Windows2.Parent 屬性

發行項
10/28/2012

取得 Windows2 集合的直接上層父物件。

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

語法

'宣告
ReadOnly Property Parent As DTE

DTE Parent { get; }

property DTE^ Parent {
    DTE^ get ();
}

abstract Parent : DTE

function get Parent () : DTE

屬性值

型別：EnvDTE.DTE
DTE 物件。

備註

Parent 屬性會將直接上層父代傳給物件或集合。

範例

這個範例會顯示 Parent 物件的檔名。

如需如何像執行增益集一般，執行這個範例的詳細資訊，請參閱 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)
    GetParentFileName(_applicationObject)
End Sub
Sub GetParentFileName(ByVal dte As DTE2)
    Dim win As Windows2
    win = CType(_applicationObject.Windows, EnvDTE80.Windows2)
    MsgBox("The file name of the Windows parent object is: " & vbCr _
    & win.Parent.FileName)
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;
    GetParentFileName(_applicationObject);
}
public void GetParentFileName(DTE2 dte)
{
    Windows2 win;
    win = (EnvDTE80.Windows2)_applicationObject.Windows;
    MessageBox.Show("The file name of the Windows parent object is: " 
+ "\n" + win.Parent.FileName);
}