Expressions.Parent - свойство

Статья
11/01/2012

Получает ближайший родительский объект коллекции Expressions.

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

Синтаксис

'Декларация
ReadOnly Property Parent As Debugger

Debugger Parent { get; }

property Debugger^ Parent {
    Debugger^ get ();
}

abstract Parent : Debugger

function get Parent () : Debugger

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

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

Заметки

СвойствоParent возвращает ближайший родительский объект коллекции Expressions.

Примеры

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

Тестирование данного свойства:

Целевое приложение должно содержать класс A.Функция Main должна создать экземпляр класса A с именем a.
Задайте точку останова в функции Main после создания экземпляра класса A и инициализации его переменных-членов.
Запустите приложение в режиме отладки.
Когда выполнение приложения остановится в точке останова, запустите надстройку.

public static void Parent(DTE 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("Parent Property Test");
    owp.Activate();

    EnvDTE.Expression exp = dte.Debugger.GetExpression("a", true, 1);
    EnvDTE.Expressions exps = exp.DataMembers;
    owp.OutputString("\nExpression count: " + exps.Count);
    owp.OutputString("\nEdition of the environment: " + exps.DTE.Edition);
    owp.OutputString("\nThe name of the current program: " + 
                     exps.Parent.CurrentProgram.Name);
    owp.OutputString("\nSecond expression: " + exps.Item(2).Name);
}

Shared Sub Parent(ByRef dte As EnvDTE.DTE)
    Dim exp As EnvDTE.Expression = dte.Debugger.GetExpression("a", True, 1)
    Dim exps As EnvDTE.Expressions = exp.DataMembers
    Dim str As String = vbCrLf
    str = "Expression count: " + exps.Count.ToString()
    str += vbCrLf + "Edition of the environment: " + exps.DTE.Edition
    str += vbCrLf + "The name of the current program: " + _
           exps.Parent.CurrentProgram.Name
    str += vbCrLf + "Second expression: " + exps.Item(2).Name
    MessageBox.Show(str, "Expression Test - Expressions Properties")
End Sub

Безопасность платформы .NET Framework

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