SelectedItems, interface
Contient des objets SelectedItem représentant les projets ou éléments de projet sélectionnés.
Espace de noms : EnvDTE
Assembly : EnvDTE (dans EnvDTE.dll)
Syntaxe
'Déclaration
<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
Le type SelectedItems expose les membres suivants.
Propriétés
Nom | Description | |
---|---|---|
Count | Obtient une valeur indiquant le nombre d'objets de la collection SelectedItems. | |
DTE | Obtient l'objet d'extensibilité de niveau supérieur. | |
MultiSelect | Obtient une valeur indiquant si la sélection en cours comporte plusieurs éléments. | |
Parent | Obtient l'objet parent immédiat d'une collection SelectedItems. | |
SelectionContainer | Obtient un objet SelectionContainer représentant le concepteur hébergeant les éléments sélectionnés. |
Début
Méthodes
Nom | Description | |
---|---|---|
GetEnumerator | Obtient une énumération pour les éléments d'une collection. | |
Item | Retourne un objet SelectedItem dans la collection SelectedItems. |
Début
Notes
Il existe toujours une collection SelectedItems, même lorsque aucun élément de projet n'est sélectionné. Par exemple, si l'Explorateur de solutions a le focus et qu'un nœud de projet est sélectionné, cela signifie qu'il y a un objet SelectedItem. La propriété Project de l'élément sélectionné fait référence au projet sélectionné et sa propriété ProjectItem est Null.
Exemples
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