ContextAttribute Interface

Represents a single attribute associated with a global context or window's context in the Dynamic Help window.

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

The ContextAttribute type exposes the following members.

Properties

	Name	Description
	Collection	Gets the collection containing the ContextAttribute object supporting this property.
	DTE	Gets the top-level extensibility object.
	Name	Gets the name of the object.
	Values	Gets a collection of values for the attribute.

Top

Methods

	Name	Description
	Remove	Removes the attribute from its parent ContextAttributes collection.

Top

Examples

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

See Also

Reference

EnvDTE Namespace