Process.Programs 속성

아티클
10/24/2012

이 프로세스에서 관리 중인 프로그램의 컬렉션을 가져옵니다.

네임스페이스: EnvDTE
어셈블리: EnvDTE(EnvDTE.dll)

구문

‘선언
ReadOnly Property Programs As Programs

Programs Programs { get; }

property Programs^ Programs {
    Programs^ get ();
}

abstract Programs : Programs

function get Programs () : Programs

속성 값

형식: EnvDTE.Programs
Programs 컬렉션입니다.

예제

다음 예제에서는 Programs 속성을 사용하는 방법을 보여 줍니다.

이 속성을 테스트하려면

대상 응용 프로그램에 중단점을 설정합니다.
디버그 모드에서 대상 응용 프로그램을 실행합니다.
응용 프로그램이 중단점에서 멈추면 추가 기능을 실행합니다.

public static void Programs(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("Programs Property Test");
    owp.Activate();
    owp.OutputString("\nEdition of the environment: " + 
                        dte.Debugger.DebuggedProcesses.Item(1).DTE.Edition);
    owp.OutputString("\nThe name of the current program: " + 
                        dte.Debugger.DebuggedProcesses.Item(1).Name);
    owp.OutputString("\nThe name of the current program: " + 
                        dte.Debugger.DebuggedProcesses.Item(1).Parent.CurrentProgram.Name);
    owp.OutputString("\nProcess ID: " + 
                        dte.Debugger.DebuggedProcesses.Item(1).ProcessID);
    EnvDTE.Programs programs = 
                        dte.Debugger.DebuggedProcesses.Item(1).Programs;
    owp.OutputString("\nThe name of the current program: " + 
                        programs.Item(1).Name);
}

Shared Sub Programs(ByRef dte As EnvDTE.DTE)
    Dim str As String
    Dim processes As EnvDTE.Processes = dte.Debugger.DebuggedProcesses
    str = "Edition of the environment: " + processes.Item(1).DTE.Edition
    str += vbCrLf + "The name of the current program: " + _
           processes.Item(1).Name
    str += vbCrLf + "The name of the current program: " + _
           processes.Item(1).Parent.CurrentProgram.Name
    str += vbCrLf + "Process ID: " + processes.Item(1).ProcessID.ToString()
    str += vbCrLf + "The name of the current program: " + _
           processes.Item(1).Programs.Item(1).Name
    MessageBox.Show(str, "Programs Property Test")
End Sub