'Usage Dim instance As ExcelSparklineGroup 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 ExcelSparklineGroup Dim w As XmlTextWriter Dim value As Boolean value = instance.Serialize(w)
fpSpread1.Sheets[0].SetClip(0, 0, 1, 5, "1\t2\t3\t4\t5"); fpSpread1.Sheets[0].SetClip(1, 0, 1, 5, "5\t4\t3\t2\t1"); fpSpread1.Sheets[0].SetClip(2, 0, 1, 5, "1\t2\t3\t2\t1"); FarPoint.Win.Spread.ExcelSparkline es = new FarPoint.Win.Spread.ExcelSparkline(0, 6, fpSpread1.Sheets[0], new FarPoint.Win.Spread.Model.CellRange(0, 0, 1, 5)); FarPoint.Win.Spread.ExcelSparkline es1 = new FarPoint.Win.Spread.ExcelSparkline(1, 6, fpSpread1.Sheets[0], new FarPoint.Win.Spread.Model.CellRange(1, 0, 1, 5)); FarPoint.Win.Spread.ExcelSparkline es2 = new FarPoint.Win.Spread.ExcelSparkline(2, 6, fpSpread1.Sheets[0], new FarPoint.Win.Spread.Model.CellRange(2, 0, 1, 5)); FarPoint.Win.Spread.ExcelSparklineGroup esg = new FarPoint.Win.Spread.ExcelSparklineGroup(new FarPoint.Win.Spread.ExcelSparklineSetting(), FarPoint.Win.Spread.SparklineType.Column); esg.Add(es); esg.Add(es1); esg.Add(es2); fpSpread1.Sheets[0].SparklineContainer.Add(esg); FarPoint.Win.Spread.ExcelSparklineSetting eSetting = new FarPoint.Win.Spread.ExcelSparklineSetting(); eSetting.ShowMarkers = true; eSetting.AxisColor = Color.Cyan; string fileName = "c:\\ExcelSparklineGroup.xml"; //Serialize FarPoint.Win.Spread.ExcelSparklineGroup ea = (FarPoint.Win.Spread.ExcelSparklineGroup)fpSpread1.ActiveSheet.SparklineContainer[0]; ea.Setting = eSetting; 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("ExcelSparklineGroup"); writer.WriteEndElement(); writer.WriteEndDocument(); writer.Close(); //Deserialize FarPoint.Win.Spread.ExcelSparklineGroup e1 = new FarPoint.Win.Spread.ExcelSparklineGroup(); System.Xml.XmlDocument doc = new System.Xml.XmlDocument(); doc.Load(fileName); System.Xml.XmlNode node; node = doc.FirstChild; while (!node.Name.Equals("ExcelSparklineGroup")) node = node.NextSibling; System.Xml.XmlNodeReader r = new System.Xml.XmlNodeReader(node); r.Read();
FpSpread1.Sheets(0).SetClip(0, 0, 1, 5, "1" + Chr(9) + "2" + Chr(9) + "3" + Chr(9) + "4" + Chr(9) + "5") FpSpread1.Sheets(0).SetClip(1, 0, 1, 5, "5" + Chr(9) + "4" + Chr(9) + "3" + Chr(9) + "2" + Chr(9) + "1") FpSpread1.Sheets(0).SetClip(2, 0, 1, 5, "1" + Chr(9) + "2" + Chr(9) + "3" + Chr(9) + "2" + Chr(9) + "1") Dim es As New FarPoint.Win.Spread.ExcelSparkline(0, 6, FpSpread1.Sheets(0), New FarPoint.Win.Spread.Model.CellRange(0, 0, 1, 5)) Dim es1 As New FarPoint.Win.Spread.ExcelSparkline(1, 6, FpSpread1.Sheets(0), New FarPoint.Win.Spread.Model.CellRange(1, 0, 1, 5)) Dim es2 As New FarPoint.Win.Spread.ExcelSparkline(2, 6, FpSpread1.Sheets(0), New FarPoint.Win.Spread.Model.CellRange(2, 0, 1, 5)) Dim esg As New FarPoint.Win.Spread.ExcelSparklineGroup(New FarPoint.Win.Spread.ExcelSparklineSetting(), FarPoint.Win.Spread.SparklineType.Column) esg.Add(es) esg.Add(es1) esg.Add(es2) FpSpread1.Sheets(0).SparklineContainer.Add(esg) Dim eSetting As New FarPoint.Win.Spread.ExcelSparklineSetting() eSetting.ShowMarkers = True eSetting.AxisColor = Color.Cyan Dim fileName As String = "c:\ExcelSparklineGroup.xml" 'Serialize Dim ea As FarPoint.Win.Spread.ExcelSparklineGroup = DirectCast(FpSpread1.ActiveSheet.SparklineContainer(0), FarPoint.Win.Spread.ExcelSparklineGroup) ea.Setting = eSetting 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("ExcelSparklineGroup") writer.WriteEndElement() writer.WriteEndDocument() writer.Close() 'Deserialize Dim e1 As New FarPoint.Win.Spread.ExcelSparklineGroup() Dim doc As New System.Xml.XmlDocument() doc.Load(fileName) Dim node As System.Xml.XmlNode node = doc.FirstChild While Not node.Name.Equals("ExcelSparklineGroup") node = node.NextSibling End While Dim r As New System.Xml.XmlNodeReader(node) r.Read()