ContextAttribute-Schnittstelle
Stellt ein einzelnes Attribut dar, das mit einem globalen Kontext oder einem Fensterkontext im Fenster Dynamische Hilfe verknüpft ist.
Namespace: EnvDTE
Assembly: EnvDTE (in EnvDTE.dll)
Syntax
'Declaration
<GuidAttribute("1A6E2CB3-B897-42EB-96BE-FF0FDB65DB2F")> _
Public Interface ContextAttribute
[GuidAttribute("1A6E2CB3-B897-42EB-96BE-FF0FDB65DB2F")]
public interface ContextAttribute
[GuidAttribute(L"1A6E2CB3-B897-42EB-96BE-FF0FDB65DB2F")]
public interface class ContextAttribute
[<GuidAttribute("1A6E2CB3-B897-42EB-96BE-FF0FDB65DB2F")>]
type ContextAttribute = interface end
public interface ContextAttribute
Der ContextAttribute-Typ macht die folgenden Member verfügbar.
Eigenschaften
Name | Beschreibung | |
---|---|---|
Collection | Ruft die Auflistung mit dem ContextAttribute-Objekt ab, das diese Eigenschaft unterstützt. | |
DTE | Ruft das Erweiterbarkeitsobjekt der obersten Ebene ab. | |
Name | Ruft den Namen des Objekts ab. | |
Values | Ruft eine Auflistung von Werten für das Attribut ab. |
Zum Seitenanfang
Methoden
Name | Beschreibung | |
---|---|---|
Remove | Entfernt das Attribut aus der übergeordneten ContextAttributes-Auflistung. |
Zum Seitenanfang
Beispiele
Sub ContextAttributeExample()
' Get a reference to Solution Explorer.
Dim SolnEx As Window = DTE.Windows. _
Item(Constants.vsWindowKindSolutionExplorer)
Dim CA As ContextAttribute
' List the current attributes associated with Solution Explorer.
ListAttr(SolnEx, CA)
' Associate a new F1 keyword with Solution Explorer.
SolnEx.ContextAttributes.Add("ANewKeyword", 900, _
vsContextAttributeType.vsContextAttributeLookupF1)
ListAttr(SolnEx, CA)
' Delete the new F1 keyword from Solution Explorer.
SolnEx.ContextAttributes.Item(3).Remove()
ListAttr(SolnEx, CA)
End Sub
Sub ListAttr(ByVal SolnEx As Object, ByVal CA As ContextAttribute)
' Support function for CATest(). Lists the current attributes
' associated with Solution Explorer.
Dim msg As String
MsgBox("Number of context attributes in Solution Explorer: " & _
SolnEx.ContextAttributes.Count)
For Each CA In SolnEx.ContextAttributes
msg = msg & CA.Name & Chr(13)
Next
MsgBox(msg)
msg = ""
End Sub