Spread for ASP.NET 13 Product Documentation
FarPoint.Web.Spread Assembly / FarPoint.Web.Spread Namespace / Appearance Class / Serialize Method
XmlTextWriter object to which to save the object
Example


In This Topic
    Serialize Method (Appearance)
    In This Topic
    Saves the object to XML.
    Syntax
    'Declaration
     
    Public Overridable Function Serialize( _
       ByVal w As XmlTextWriter _
    ) As Boolean
    'Usage
     
    Dim instance As Appearance
    Dim w As XmlTextWriter
    Dim value As Boolean
     
    value = instance.Serialize(w)
    public virtual bool Serialize( 
       XmlTextWriter w
    )

    Parameters

    w
    XmlTextWriter object to which to save the object

    Return Value

    Boolean: true if successful; false otherwise
    Remarks
    This method serializes the public properties and fields of the Appearance object.
    Example
    This example creates a new Appearance object, sets the BackColor, ForeColor, Font, HorizontalAlign and VerticalAlign properties, then applies those settings to an instance of a Cell object. In the click events of two buttons the object can be either deserialized or serialized. This code does the same thing as Serializer.SaveObject and Serializer.LoadObject, and works for any object that implements ISerializeSupport.
    FarPoint.Web.Spread.Appearance appr = new FarPoint.Web.Spread.Appearance();
    FarPoint.Web.Spread.Cell acell;
    appr.BackColor = Color.Red;
    appr.ForeColor = Color.White;
    appr.Font.Bold = true;
    appr.HorizontalAlign = HorizontalAlign.Right;
    appr.VerticalAlign = VerticalAlign.Top;
    acell = FpSpread1.Cells[0,0];
    acell.BackColor = appr.BackColor;
    acell.ForeColor = appr.ForeColor;
    acell.Font.Bold = appr.Font.Bold;
    acell.HorizontalAlign = appr.HorizontalAlign;
    acell.VerticalAlign = appr.VerticalAlign;
    FpSpread1.ActiveSheetView.SetValue(0, 0, "Appearance Test");
    FpSpread1.Columns[0].Width = 150;
    FpSpread1.Rows[0].Height = 60;
    
    
    private void Button1_Click(object sender, System.EventArgs e)
    {
        string fileName = "D:\\Temp\\myser.xml";
        System.IO.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("Appearance");
        appr.Serialize(writer);
        writer.WriteEndElement();
        writer.WriteEndDocument();
        writer.Close();  
    }
    
    private void Button2_Click(object sender, System.EventArgs e)
    {
        bool b;
        System.Xml.XmlDocument doc = new System.Xml.XmlDocument();
        System.Xml.XmlNode node; 
        System.Xml.XmlNodeReader r;
        doc.Load("D:\\Temp\\myser.xml");
        node = doc.FirstChild;
        while (!node.Name.Equals("Appearance"))
            node = node.NextSibling;
        r = new System.Xml.XmlNodeReader(node);
        r.Read();
        b = appr.Deserialize(r);
        ListBox1.Items.Add(b.ToString());  
    }
    
    Dim appr As New FarPoint.Web.Spread.Appearance()
    appr.BackColor = Color.Red
    appr.ForeColor = Color.White
    appr.Font.Bold = True
    appr.HorizontalAlign = HorizontalAlign.Right
    appr.VerticalAlign = VerticalAlign.Top
    Dim acell As FarPoint.Web.Spread.Cell
    acell = FpSpread1.Cells(0, 0)
    acell.BackColor = appr.BackColor
    acell.ForeColor = appr.ForeColor
    acell.Font.Bold = appr.Font.Bold
    acell.HorizontalAlign = appr.HorizontalAlign
    acell.VerticalAlign = appr.VerticalAlign
    FpSpread1.ActiveSheetView.SetValue(0, 0, "Appearance Test")
    FpSpread1.Columns(0).Width = 150
    FpSpread1.Rows(0).Height = 60
    
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim fileName As String
        Dim stream As System.IO.Stream
        Dim writer As System.Xml.XmlTextWriter
        fileName = "D:\Temp\myser.xml"
        stream = System.IO.File.Open(fileName, System.IO.FileMode.Create)
        writer = New System.Xml.XmlTextWriter(stream, System.Text.Encoding.UTF8)
        writer.Formatting = System.Xml.Formatting.Indented
        writer.Indentation = 2
        writer.WriteStartDocument()
        writer.WriteStartElement("Appearance")
        appr.Serialize(writer)
        writer.WriteEndElement()
        writer.WriteEndDocument()
        writer.Close()
    End Sub
    
    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Dim b As Boolean
        Dim doc As New System.Xml.XmlDocument()
        Dim node As System.Xml.XmlNode
        Dim r As System.Xml.XmlNodeReader
        doc.Load("D:\Temp\myser.xml")
        node = doc.FirstChild
        While Not (node.Name.Equals("Appearance"))
            node = node.NextSibling
        End While
        r = New System.Xml.XmlNodeReader(node)
        r.Read()
        b = appr.Deserialize(r)
        ListBox1.Items.Add(b)
    End Sub
    
    See Also