XObject.AddAnnotation(Object) Yöntem
Tanım
Önemli
Bazı bilgiler ürünün ön sürümüyle ilgilidir ve sürüm öncesinde önemli değişiklikler yapılmış olabilir. Burada verilen bilgilerle ilgili olarak Microsoft açık veya zımni hiçbir garanti vermez.
Bu XObjectöğesinin ek açıklama listesine bir nesne ekler.
public:
void AddAnnotation(System::Object ^ annotation);
public void AddAnnotation (object annotation);
member this.AddAnnotation : obj -> unit
Public Sub AddAnnotation (annotation As Object)
Parametreler
- annotation
- Object
Eklenecek ek açıklamayı içeren bir nesne.
Örnekler
Aşağıdaki örnek, öğesine bir XElementek açıklama ekler.
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
Bu örnek aşağıdaki çıkışı oluşturur:
T1
Açıklamalar
Ek açıklamaların bilgi kümesinin parçası olmadığını unutmayın; kalıcı değildir veya tarafından ToStringgörüntülenmez. Ayrıca, BIR XML Ad Alanını VB projenize aktarır ve SaveOptions.OmitDuplicateNamespaces numaralandırma değeriyle AddAnnotation'ı çağırırsanız, her öğe yerine yalnızca bir öğe XML Ad Alanı özniteliğini içerir. Daha fazla bilgi için bkz. XML Değişmez Değerlerinde yinelenen ad alanlarını kaldırma.