更新 : 2007 年 11 月
ソース コード内のデリゲートを表します。
名前空間 : EnvDTE80
アセンブリ : EnvDTE80 (EnvDTE80.dll 内)
構文
'宣言
<GuidAttribute("3B1B24EF-DD8E-4C98-8799-4EFAC80080E9")> _
Public Interface CodeDelegate2 _
Implements CodeDelegate
'使用
Dim instance As CodeDelegate2
[GuidAttribute("3B1B24EF-DD8E-4C98-8799-4EFAC80080E9")]
public interface CodeDelegate2 : CodeDelegate
[GuidAttribute(L"3B1B24EF-DD8E-4C98-8799-4EFAC80080E9")]
public interface class CodeDelegate2 : CodeDelegate
public interface CodeDelegate2 extends CodeDelegate
解説
このオブジェクトは CodeDelegate から派生します。
![]() |
---|
特定の種類の編集を行うと、クラス、構造体、関数、属性、デリゲートなどのコード モデル要素が非確定的な値になる場合があります。つまり、これらの要素の値は、常に同じ値になるとは限りません。詳細については、「コード モデルを使用したコードの調査 (Visual Basic)」の「変更されるコード モデル要素値」を参照してください。 |
例
Sub codeDelegateExample(ByVal dte As DTE2)
' Before running this example, open a code document from a project
' and place the insertion point inside a variable definition.
Try
' Retrieve the CodeVariable at the insertion point.
Dim sel As TextSelection = _
CType(dte.ActiveDocument.Selection, TextSelection)
Dim del As CodeDelegate2 = _
CType(sel.ActivePoint.CodeElement( _
vsCMElement.vsCMElementVariable), CodeDelegate2)
' Display the base class name of the delegate.
MsgBox("Delegate's base class name: " & del.BaseClass.Name)
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Sub
public void codeDelegateExample(DTE2 dte)
{
// Before running this example, open a code document from a
// project and place the insertion point inside a delegate
// declaration.
try
{
TextSelection objTextSel;
CodeDelegate objCodeDel;
CodeElement objCodeElem;
objTextSel = (TextSelection)dte.ActiveDocument.Selection;
objCodeDel =
(CodeDelegate)objTextSel.ActivePoint.
get_CodeElement(vsCMElement.vsCMElementDelegate);
// Display the fullname of the CodeDelegate object.
MessageBox.Show(objCodeDel.FullName);
// Prove that the parent object of a CodeClass is a CodeElement.
objCodeElem = (CodeElement)objCodeDel.Parent;
}
catch (Exception ex)
{
MessageBox.Show(ex.Message);
}
}
参照
参照
その他の技術情報
方法 : オートメーション オブジェクト モデルのコード例をコンパイルおよび実行する