SelectedItems (Interfaz)

Contiene objetos SelectedItem, cada uno de los cuales representa proyectos o elementos de proyecto.

Espacio de nombres:  EnvDTE
Ensamblado:  EnvDTE (en EnvDTE.dll)

Sintaxis

'Declaración
<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

El tipo SelectedItems expone los siguientes miembros.

Propiedades

	Nombre	Descripción
	Count	Obtiene un valor que indica el número de objetos de la colección SelectedItems.
	DTE	Obtiene el objeto de extensibilidad de nivel superior.
	MultiSelect	Obtiene si la selección actual incluye o no varios elementos.
	Parent	Obtiene el objeto primario inmediato de una colección SelectedItems.
	SelectionContainer	Obtiene un objeto SelectionContainer que representa al diseñador que hospeda el elemento o elementos seleccionados.

Arriba

Métodos

	Nombre	Descripción
	GetEnumerator	Obtiene una enumeración para los elementos de una colección.
	Item	Devuelve un objeto SelectedItem en la colección SelectedItems.

Arriba

Comentarios

Siempre hay una colección SelectedItems, incluso cuando no haya elementos de proyecto. Por ejemplo, si el Explorador de soluciones tiene el foco y hay un nodo de proyecto seleccionado, habrá un objeto SelectedItem. La propiedad Project del elemento seleccionado hace referencia al proyecto seleccionado y su propiedad ProjectItem es Null.

Ejemplos

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

Vea también

Referencia

EnvDTE (Espacio de nombres)