Debugger3.CurrentThread - свойство

Статья
11/05/2008

Обновлен: Ноябрь 2007

Возвращает или задает отлаживаемый текущий поток.

Пространство имен: EnvDTE90
Сборка: EnvDTE90 (в EnvDTE90.dll)

Синтаксис

'Декларация
Property CurrentThread As Thread
'Применение
Dim instance As Debugger3
Dim value As Thread

value = instance.CurrentThread

instance.CurrentThread = value

Thread CurrentThread { get; set; }

property Thread^ CurrentThread {
    Thread^ get ();
    void set (Thread^ value);
}

function get CurrentThread () : Thread
function set CurrentThread (value : Thread)

Значение свойства

Тип: EnvDTE.Thread
Объект Thread.

Реализации

Debugger2.CurrentThread

Примеры

В следующем примере демонстрируется использование свойства CurrentThread.

Чтобы проверить это свойство, выполните следующие действия.

Задайте в приложении точку останова. Запустите надстройку.

Текущий поток пуст.
Задайте в приложении точку останова. Запустите приложение в режиме отладки. Когда выполнение программы остановится в точке останова, запустите надстройку.

public static void CurrentThread(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 Thread 
    Test");
    owp.Activate();

    owp.OutputString("Current Thread Info: ");
    EnvDTE90.Debugger3 debugger = (EnvDTE90.Debugger3)dte.Debugger;
    EnvDTE.Thread thread = debugger.CurrentThread;

    if (thread == null)
        owp.OutputString("No program is being debugged");
    else
        foreach (EnvDTE.StackFrame sf in thread.StackFrames)
            owp.OutputString("\nStack Frame: 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) + ": " + _
        poc.Name + vbCrLf)
    End If
End Sub

Разрешения

Полное доверие для непосредственно вызывающего метода. Этот член не может быть использован частично доверенным кодом. Дополнительные сведения см. в разделе Использование библиотек из не вполне надежного кода.

См. также

Ссылки

Debugger3 Интерфейс

Debugger3 - члены

CurrentThread - перегрузка

EnvDTE90 - пространство имен

Поделиться через