Process.DTE プロパティ

[アーティクル]
08/22/2008

更新 : 2007 年 11 月

トップレベルの機能拡張オブジェクトを取得します。

名前空間 : EnvDTE
アセンブリ : EnvDTE (EnvDTE.dll 内)

構文

'宣言
ReadOnly Property DTE As DTE
'使用
Dim instance As Process
Dim value As DTE

value = instance.DTE

DTE DTE { get; }

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

function get DTE () : DTE

プロパティ値

型 : EnvDTE.DTE

DTE オブジェクト。

解説

Visual Studio では、DTE オブジェクトがオートメーションモデルのルートオブジェクトです。他のオブジェクトモデルでは、多くの場合、"アプリケーション" と呼ばれます。

例

DTE プロパティの使用方法を次の例に示します。

このプロパティをテストするには

ターゲットアプリケーションにブレークポイントを設定します。
ターゲットアプリケーションをデバッグモードで実行します。
ブレークポイントでアプリケーションが停止したら、アドインを実行します。

public static void DTE(DTE dte)
{
    // Setup debug Output window.
    Window w = (Window)dte.Windows.Item(EnvDTE.Constants.vsWindowKindOutput);
    w.Visible = true;
    OutputWindow ow = (OutputWindow)w.Object;
    OutputWindowPane owp = ow.OutputWindowPanes.Add("DTE Property Test");
    owp.Activate();
    owp.OutputString("\nEdition of the environment: " + 
                        dte.Debugger.DebuggedProcesses.Item(1).DTE.Edition);
    owp.OutputString("\nThe name of the current program: " + 
                        dte.Debugger.DebuggedProcesses.Item(1).Name);
    owp.OutputString("\nThe name of the current program: " + 
                        dte.Debugger.DebuggedProcesses.Item(1).Parent.CurrentProgram.Name);
    owp.OutputString("\nProcess ID: " + 
                        dte.Debugger.DebuggedProcesses.Item(1).ProcessID);
    EnvDTE.Programs programs = 
                        dte.Debugger.DebuggedProcesses.Item(1).Programs;
    owp.OutputString("\nThe name of the current program: " + 
                        programs.Item(1).Name);
}

Shared Sub DTE(ByRef dte As EnvDTE.DTE)
    Dim str As String
    Dim processes As EnvDTE.Processes = dte.Debugger.DebuggedProcesses
    str = "Edition of the environment: " + processes.Item(1).DTE.Edition
    str += vbCrLf + "The name of the current program: " + _
           processes.Item(1).Name
    str += vbCrLf + "The name of the current program: " + _
           processes.Item(1).Parent.CurrentProgram.Name
    str += vbCrLf + "Process ID: " + processes.Item(1).ProcessID.ToString()
    str += vbCrLf + "The name of the current program: " + _
           processes.Item(1).Programs.Item(1).Name
    MessageBox.Show(str, "DTE Property Test")
End Sub