Debugger2.CurrentStackFrame プロパティ

[アーティクル]
08/09/2011

現在のスタックフレームを取得するか、または設定します。

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

構文

'宣言
Property CurrentStackFrame As StackFrame
    Get
    Set

StackFrame CurrentStackFrame { get; set; }

property StackFrame^ CurrentStackFrame {
    StackFrame^ get ();
    void set (StackFrame^ value);
}

abstract CurrentStackFrame : StackFrame with get, set

function get CurrentStackFrame () : StackFrame
function set CurrentStackFrame (value : StackFrame)

プロパティ値

型: EnvDTE.StackFrame
StackFrame オブジェクト。

実装

Debugger.CurrentStackFrame

解説

スタックフレームの詳細については、「メモリ管理 : フレーム割り当て」を参照してください。

例

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

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

ターゲットアプリケーションにブレークポイントを設定します。アドインを実行します。

現在のスタックフレームは空です。
ターゲットアプリケーションにブレークポイントを設定します。ターゲットアプリケーションをデバッグモードで実行します。ブレークポイントでプログラムが停止したら、アドインを実行します。

現在のスタックフレームには、メソッド名と戻り値の型が格納されています。

public static void CurrentStackFrame(EnvDTE80.DTE2 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("Current StackFrame 
    Test");
    owp.Activate();

    owp.OutputString("Current Stack Frame Info: ");
    EnvDTE80.Debugger2 debugger = (EnvDTE80.Debugger2)dte.Debugger;
    EnvDTE.StackFrame sf = debugger.CurrentStackFrame;
    if (sf == null)
        owp.OutputString("No program is being debugged, Stack Frame is 
        empty.");
    else
        owp.OutputString("Function " + sf.FunctionName +
                         " returns type " + sf.ReturnType);
}

Sub ShowCurrentProcess()
    ' This function displays the current debugger
    ' mode in the output window.
    Dim ow As OutputWindow
    ow = DTE2.Windows.Item(Constants.vsWindowKindOutput).Object

    Dim proc As EnvDTE.Process2
    proc = DTE2.Debugger.CurrentProcess

    If (proc Is Nothing) Then
        ow.ActivePane.OutputString("No process is being debugged")
    Else
        ow.ActivePane.OutputString("" + Str(proc.ProcessID) + ": " + _
        proc.Name + vbCrLf)
    End If
End Sub