Debugger3.CurrentMode Свойство
Определение
Важно!
Некоторые сведения относятся к предварительной версии продукта, в которую до выпуска могут быть внесены существенные изменения. Майкрософт не предоставляет никаких гарантий, явных или подразумеваемых, относительно приведенных здесь сведений.
Возвращает текущий режим отладчика в контексте интегрированной среды разработки.
public:
property EnvDTE::dbgDebugMode CurrentMode { EnvDTE::dbgDebugMode get(); };
public:
property EnvDTE::dbgDebugMode CurrentMode { EnvDTE::dbgDebugMode get(); };
[System.Runtime.InteropServices.DispId(102)]
public EnvDTE.dbgDebugMode CurrentMode { [System.Runtime.InteropServices.DispId(102)] get; }
[<System.Runtime.InteropServices.DispId(102)>]
[<get: System.Runtime.InteropServices.DispId(102)>]
member this.CurrentMode : EnvDTE.dbgDebugMode
Public ReadOnly Property CurrentMode As dbgDebugMode
Значение свойства
Значение dbgDebugMode.
Реализации
- Атрибуты
Примеры
В следующем примере показано, как использовать свойство CurrentMode.
public static void CurrentMode(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 Mode");
owp.Activate();
owp.OutputString("Current Mode: ");
EnvDTE90.Debugger3 debugger = (EnvDTE90.Debugger3)dte.Debugger;
switch (debugger.CurrentMode)
{
case dbgDebugMode.dbgDesignMode:
owp.OutputString("Design Mode");
break;
case dbgDebugMode.dbgBreakMode:
owp.OutputString("Break Mode");
break;
case dbgDebugMode.dbgRunMode:
owp.OutputString("Run Mode");
break;
}
}
Sub DebuggerMode()
' This function displays the current debugger mode in a new
' pane in the Output window.
Dim ow As OutputWindow
ow = DTE.Windows.Item(Constants.vsWindowKindOutput).Object
Dim bppane As OutputWindowPane
bppane = ow.OutputWindowPanes.Add("Debugger")
Select Case dte.Debugger3.CurrentMode
Case dbgDebugMode.dbgBreakMode
bppane.OutputString("Break Mode" + vbCrLf)
Case dbgDebugMode.dbgDesignMode
bppane.OutputString("Design Mode" + vbCrLf)
Case dbgDebugMode.dbgRunMode
bppane.OutputString("Run Mode" + vbCrLf)
End Select
End Sub