Interfejs ContextAttribute

Reprezentuje pojedynczy atrybut skojarzonych z globalnym kontekście lub kontekst okna w Pomoc dynamiczne okna.

Przestrzeń nazw:  EnvDTE
Zestaw:  EnvDTE (w EnvDTE.dll)

Składnia

'Deklaracja
<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

Typ ContextAttribute uwidacznia następujące elementy członkowskie.

Właściwości

	Nazwa	Opis
	Collection	Pobiera zawierające kolekcji ContextAttribute wspieranie tej właściwości obiektu.
	DTE	Pobiera obiekt rozszerzalności najwyższego poziomu.
	Name	Pobiera nazwę obiektu.
	Values	Pobiera zbiór wartości dla atrybutu.

Początek

Metody

	Nazwa	Opis
	Remove	Usuwa atrybut ze swojej witryny nadrzędnej ContextAttributes kolekcji.

Początek

Przykłady

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

Zobacz też

Informacje

Przestrzeń nazw EnvDTE