مشاركة عبر


Debugger2.CurrentThread الخاصية

الحصول أو تعيين الحالي مؤشر ترابط يتم تصحيحه.

مساحة الاسم:  EnvDTE80
التجميع:  EnvDTE80 (في EnvDTE80.dll)

بناء الجملة

'إقرار
Property CurrentThread As Thread
    Get
    Set
Thread CurrentThread { get; set; }
property Thread^ CurrentThread {
    Thread^ get ();
    void set (Thread^ value);
}
abstract CurrentThread : Thread with get, set
function get CurrentThread () : Thread
function set CurrentThread (value : Thread)

قيمة الخاصية

النوع: EnvDTE.Thread
كائن Thread .

التطبيقات

Debugger.CurrentThread

أمثلة

يوضح المثال التالي كيفية إلى تستخدم في CurrentThreadخاصية.

لاختبار هذه خاصية:

  1. التعيين نقطة توقف في تطبيق الهدف. قم بتشغيل الوظيفة الإضافية.

    مسار التنفيذ الحالي هو فارغة.

  2. التعيين نقطة توقف في تطبيق الهدف. قم بتشغيل تطبيق الهدف يصحح الالوضع. عندما يتم إيقاف البرنامج عند نقطة إيقاف، تشغيل إضافة-في.

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: ");
    EnvDTE80.Debugger2 debugger = (EnvDTE80.Debugger2)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

أمن NET Framework.

راجع أيضًَا

المرجع

Debugger2 واجهة

Debugger2 الأعضاء

CurrentThread التحميل الزائد

EnvDTE80 مساحة الاسم