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مجموعة، حتى في حالة عدم وجود عناصر مشروع. على سبيل المثال، إذا كان لدى من مستكشف الحل تركيز وعقده مشروع هو المحددة، ثم هناك هو واحدة 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

راجع أيضًَا

المرجع

SelectedItems الأعضاء

EnvDTE مساحة الاسم