Die Eigenschaft Contents gibt einen Variant zurück, in dem die serialisierten Daten des PropertyBags gespeichert sind, oder legt den Inhalt des PropertyBags fest.
Syntax | |
Contents | |
Rückgabewert | |
Typ |
Beschreibung |
Variant |
Die serialisierten Daten des PropertyBags. |
Parameter | |
Kein |
Beispiel:
Dim Bag1 As New TCEServer.PropertyBag
#Write some properties in the bag
Bag1.WriteProperty("Name1", "Adam")
Bag1.WriteProperty("Name2", "James")
Bag1.WriteProperty("Name3", "John")
Bag1.WriteProperty("Count", 3)
Dim BagSerialized As Variant
#save the content of the bag in a variant
BagSerialized := Bag1.Contents
#create another property bag
Dim Bag2 As New TCEServer.PropertyBag
#load the content of bag2 with bag1
Bag2.Contents := BagSerialized
#output the name2; output will be James
MsgBox(Bag2.ReadProperty("Name2"))