SelectedItems - интерфейс

Статья
08/11/2011

Содержит объекты 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()	Возвращает перечислитель, который выполняет итерацию по элементам коллекции. (Унаследовано от IEnumerable.)
	GetEnumerator()	Возвращает перечисление элементов коллекции.
	Item	Возвращает объект SelectedItem в коллекции SelectedItems.

В начало страницы

Заметки

Коллекция 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 - пространство имен

Поделиться через