次の方法で共有


ContextAttribute インターフェイス

更新 : 2007 年 11 月

[ダイナミック ヘルプ] ウィンドウのグローバル コンテキストまたはウィンドウのコンテキストに関連付けられた単一の属性を表します。

名前空間 :  EnvDTE
アセンブリ :  EnvDTE (EnvDTE.dll 内)

構文

'宣言
<GuidAttribute("1A6E2CB3-B897-42EB-96BE-FF0FDB65DB2F")> _
Public Interface ContextAttribute
'使用
Dim instance As ContextAttribute
[GuidAttribute("1A6E2CB3-B897-42EB-96BE-FF0FDB65DB2F")]
public interface ContextAttribute
[GuidAttribute(L"1A6E2CB3-B897-42EB-96BE-FF0FDB65DB2F")]
public interface class ContextAttribute
public interface ContextAttribute

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

参照

参照

ContextAttribute メンバ

EnvDTE 名前空間