Debugger3.CurrentMode Eigenschaft
Definition
Wichtig
Einige Informationen beziehen sich auf Vorabversionen, die vor dem Release ggf. grundlegend überarbeitet werden. Microsoft übernimmt hinsichtlich der hier bereitgestellten Informationen keine Gewährleistungen, seien sie ausdrücklich oder konkludent.
Ruft den aktuellen Status des Debuggers im Kontext der IDE ab.
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
Eigenschaftswert
Ein dbgDebugMode-Wert.
Implementiert
- Attribute
Beispiele
Im folgenden Beispiel wird die Verwendung der CurrentMode-Eigenschaft veranschaulicht.
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