ContextAttributes.HighPriorityAttributes Właściwość

Definicja

Pobiera kolekcję atrybutów o wysokim priorytecie.

public:
 property EnvDTE::ContextAttributes ^ HighPriorityAttributes { EnvDTE::ContextAttributes ^ get(); };
[System.Runtime.InteropServices.DispId(6)]
public EnvDTE.ContextAttributes HighPriorityAttributes { [System.Runtime.InteropServices.DispId(6)] get; }
[<System.Runtime.InteropServices.DispId(6)>]
[<get: System.Runtime.InteropServices.DispId(6)>]
member this.HighPriorityAttributes : EnvDTE.ContextAttributes
Public ReadOnly Property HighPriorityAttributes As ContextAttributes

Wartość właściwości

ContextAttributes

ContextAttributesKolekcja.

Atrybuty

Przykłady

Sub HighPriorityAttributesExample()  
    Dim cas As EnvDTE.ContextAttributes  
    Dim ca As EnvDTE.ContextAttribute  

    Try  
        cas = DTE.ContextAttributes  
        ' List all regular and high priority attributes.  
        ListAttr(ca, cas)  
        ' Add a new F1 keyword to the global high priority   
        ' attributes collection.  
        cas.HighPriorityAttributes.Add("NewAttribute", _  
        "NewF1Keyword", vsContextAttributeType. _  
        vsContextAttributeLookupF1)  
        ListAttr(ca, cas)  
        ' Remove the new high priority attribute.  
        cas.HighPriorityAttributes.Item(1).Remove()  
        ListAttr(ca, cas)  
    Catch ex As System.Exception  
        MsgBox("ERROR: " & ex.Message)  
    End Try  
End Sub  

Function ListAttr(ByVal ca As ContextAttribute, ByVal cas As _  
ContextAttributes)  
    Dim msg As String  

    Try  
        ' List regular attributes, their first value, and their count.  
        For Each ca In cas  
            msg = msg & ca.Name & "  " & ca.Values(0) & vbCr  
        Next  
        cas.Refresh()  
        MsgBox("All Attributes: " & vbCr & msg & "Count: " & _  
        cas.Count)  

        ' List high-priority attributes, their first value,   
        ' and their count.  
        msg = ""  
        For Each ca In cas.HighPriorityAttributes  
            msg = msg & ca.Name & "  " & ca.Values(0) & vbCr  
        Next  
        cas.Refresh()  
        MsgBox("High-Priority Attributes: " & vbCr & msg & "Count: " _  
        & cas.HighPriorityAttributes.Count)  
    Catch ex As System.Exception  
        MsgBox("ERROR: " & ex.Message)  
    End Try  
End Function  

Uwagi

Istnieje tylko jedno wystąpienie tej kolekcji atrybutów. Jest on dostępny tylko w ContextAttributes kolekcji. Jeśli ContextAttributes kolekcja jest dla okna, HighPriorityAttributes funkcja zwróci wartość Nothing.

Te atrybuty są zawsze stosowane i są najwyższe w priorytecie zbioru kontekstu, co powoduje dopasowanie tematów przechodzących do górnej części odpowiednich kategorii.

Dotyczy