XObject.AddAnnotation(Object) メソッド
定義
重要
一部の情報は、リリース前に大きく変更される可能性があるプレリリースされた製品に関するものです。 Microsoft は、ここに記載されている情報について、明示または黙示を問わず、一切保証しません。
この XObject の注釈の一覧にオブジェクトを追加します。
public:
void AddAnnotation(System::Object ^ annotation);
public void AddAnnotation (object annotation);
member this.AddAnnotation : obj -> unit
Public Sub AddAnnotation (annotation As Object)
パラメーター
- annotation
- Object
追加する注釈を格納しているオブジェクト。
例
次の例では、注釈 XElementを .
public class MyAnnotation {
private string tag;
public string Tag {get{return tag;} set{tag=value;}}
public MyAnnotation(string tag) {
this.tag = tag;
}
}
public class Program {
public static void Main(string[] args) {
MyAnnotation ma = new MyAnnotation("T1");
XElement root = new XElement("Root", "content");
root.AddAnnotation(ma);
MyAnnotation ma2 = (MyAnnotation)root.Annotation<MyAnnotation>();
Console.WriteLine(ma2.Tag);
}
}
Public Class MyAnnotation
Private _tag As String
Property Tag() As String
Get
Return Me._tag
End Get
Set(ByVal Value As String)
Me._tag = Value
End Set
End Property
Public Sub New(ByVal tag As String)
Me._tag = tag
End Sub
End Class
Module Module1
Sub Main()
Dim ma As MyAnnotation = New MyAnnotation("T1")
Dim root As XElement = <Root>content</Root>
root.AddAnnotation(ma)
Dim ma2 As MyAnnotation = DirectCast(root.Annotation(Of MyAnnotation)(), MyAnnotation)
Console.WriteLine(ma2.Tag)
End Sub
End Module
この例を実行すると、次の出力が生成されます。
T1
注釈
注釈はインフォセットの一部ではないことに注意してください。これらは永続化されないか、 で表示されます ToString。 また、xml 名前空間を VB プロジェクトにインポートし、SaveOptions.OmitDuplicateNamespaces 列挙値を使用して AddAnnotation を呼び出すと、すべての要素の代わりに 1 つの要素のみが XML 名前空間属性を含みます。 詳細については、「 XML リテラルでの重複する名前空間の削除」を参照してください。