'Usage Dim instance As ExcelSparkline Dim w As XmlTextWriter Dim value As Boolean value = instance.Serialize(w)
Parameters
- w
- XmlTextWriter object used to save the object
Return Value
true if successful; otherwise, false
'Usage Dim instance As ExcelSparkline Dim w As XmlTextWriter Dim value As Boolean value = instance.Serialize(w)
FarPoint.Win.Spread.ExcelSparkline es = new FarPoint.Win.Spread.ExcelSparkline(0, 5, this.fpSpread1.Sheets[0], new FarPoint.Win.Spread.Model.CellRange(0, 0, 1, 5)); string fileName = "c:\\ExcelSparkline.xml"; //Serialize System.IO.Stream stream; stream = System.IO.File.Open(fileName, System.IO.FileMode.Create); System.Xml.XmlTextWriter writer = new System.Xml.XmlTextWriter(stream, System.Text.Encoding.UTF8); writer.Formatting = System.Xml.Formatting.Indented; writer.Indentation = 2; writer.WriteStartDocument(); writer.WriteStartElement("ExcelSparkline"); writer.WriteEndElement(); writer.WriteEndDocument(); writer.Close(); //Deserialize FarPoint.Win.Spread.ExcelSparkline es1 = new FarPoint.Win.Spread.ExcelSparkline(); System.Xml.XmlDocument doc = new System.Xml.XmlDocument(); doc.Load(fileName); System.Xml.XmlNode node; node = doc.FirstChild; while (!node.Name.Equals("ExcelSparkline")) node = node.NextSibling; System.Xml.XmlNodeReader r = new System.Xml.XmlNodeReader(node); r.Read();
Dim es As New FarPoint.Win.Spread.ExcelSparkline(0, 5, fpSpread1.Sheets(0), New FarPoint.Win.Spread.Model.CellRange(0, 0, 1, 5)) Dim fileName As String = "c:\ExcelSparkline.xml" 'Serialize Dim stream As System.IO.Stream stream = System.IO.File.Open(fileName, System.IO.FileMode.Create) Dim writer As New System.Xml.XmlTextWriter(stream, System.Text.Encoding.UTF8) writer.Formatting = System.Xml.Formatting.Indented writer.Indentation = 2 writer.WriteStartDocument() writer.WriteStartElement("ExcelSparkline") writer.WriteEndElement() writer.WriteEndDocument() writer.Close() 'Deserialize Dim es1 As New FarPoint.Win.Spread.ExcelSparkline() Dim doc As New System.Xml.XmlDocument() doc.Load(fileName) Dim node As System.Xml.XmlNode node = doc.FirstChild While Not node.Name.Equals("ExcelSparkline") node = node.NextSibling End While Dim r As New System.Xml.XmlNodeReader(node) r.Read()