SelectedItems 인터페이스

선택한 프로젝트 또는 프로젝트 항목을 나타내는 SelectedItem 개체를 포함합니다.

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

구문

‘선언
<GuidAttribute("6CAA67CF-43AE-4184-AAAB-0200DDF6B240")> _
Public Interface SelectedItems _
    Inherits IEnumerable

[GuidAttribute("6CAA67CF-43AE-4184-AAAB-0200DDF6B240")]
public interface SelectedItems : IEnumerable

[GuidAttribute(L"6CAA67CF-43AE-4184-AAAB-0200DDF6B240")]
public interface class SelectedItems : IEnumerable

[<GuidAttribute("6CAA67CF-43AE-4184-AAAB-0200DDF6B240")>]
type SelectedItems =  
    interface 
        interface IEnumerable 
    end

public interface SelectedItems extends IEnumerable

SelectedItems 형식에서는 다음과 같은 멤버를 노출합니다.

속성

	이름	설명
	Count	SelectedItems 컬렉션의 개체 수를 나타내는 값을 가져옵니다.
	DTE	최상위 확장성 개체를 가져옵니다.
	MultiSelect	현재 선택 영역에 여러 항목이 포함되는지 여부를 가져옵니다.
	Parent	SelectedItems 컬렉션의 바로 위 부모 개체를 가져옵니다.
	SelectionContainer	선택한 항목을 호스팅하는 디자이너를 나타내는 SelectionContainer 개체를 가져옵니다.

위쪽

메서드

	이름	설명
	GetEnumerator	컬렉션의 항목에 대한 열거형을 가져옵니다.
	Item	SelectedItems 컬렉션의 SelectedItem 개체를 반환합니다.

위쪽

설명

프로젝트 항목이 없는 경우에도 SelectedItems 컬렉션은 항상 있습니다. 예를 들어 솔루션 탐색기에 포커스가 있고 프로젝트 노드가 선택된 경우 SelectedItem 개체 하나가 있습니다. 선택한 항목의 Project 속성은 선택한 프로젝트를 참조하고 ProjectItem 속성은 Null입니다.

예제

Sub SelectedItemsExample()
   Dim SelItems As SelectedItems
   Dim SelItemObj As SelectedItem
   Dim SelContain As SelectionContainer
   Dim SelItem As SelectedItem
   Dim NameStr As String

   SelItems = DTE.SelectedItems
   ' List the number of items selected.
   If SelItems.MultiSelect = True Then
      MsgBox("You have " & SelItems.Count & " items selected in Solution Explorer.")
   End If

   ' Set a reference to the first selected item.
   SelItemObj = SelItems.Item(1)
   ' List the names of the project or project items under the selected 
   ' item.
   For Each SelItem In SelItemObj.Collection
      NameStr = NameStr & SelItem.Name
      If TypeOf SelItem.Project Is Project Then
         NameStr = NameStr & " Project-" & SelItem.Project.Name & vbCrLf
      Else
         If TypeOf SelItem.ProjectItem Is ProjectItem Then
             NameStr = NameStr & SelItem.ProjectItem.FileNames(1) & vbCrLf
         End If
      End If
   Next
   MsgBox("You selected: " & NameStr)
End Sub

참고 항목

참조

EnvDTE 네임스페이스