FarPoint.Web.Spread.NamedStyleCollection nsc = new FarPoint.Web.Spread.NamedStyleCollection();
FarPoint.Web.Spread.NamedStyle ns = new FarPoint.Web.Spread.NamedStyle("StyleData", "DataAreaDefault");
FarPoint.Web.Spread.NamedStyle ns1 = new FarPoint.Web.Spread.NamedStyle("HeaderData", "HeaderDefault");
ns.BackColor = Color.Yellow;
ns.Border = new FarPoint.Web.Spread.Border(BorderStyle.Double, Color.Blue);
ns1.BackColor = Color.Teal;
ns1.Border = new FarPoint.Web.Spread.Border(BorderStyle.Double, Color.Red);
nsc.AddRange(new Object[] {ns, ns1});
FarPoint.Web.Spread.NamedStyle c;
c = nsc.Find("HeaderData");
if(c.Name == "HeaderData")
{
c.BackColor = Color.Tan;
}
FpSpread1.NamedStyles.Add(c);
FpSpread1.ActiveSheetView.ColumnHeader.DefaultStyle = c;
Dim nsc As New FarPoint.Web.Spread.NamedStyleCollection
Dim ns As New FarPoint.Web.Spread.NamedStyle("StyleData", "DataAreaDefault")
Dim ns1 As New FarPoint.Web.Spread.NamedStyle("HeaderData", "HeaderDefault")
ns.BackColor = Color.Yellow
ns.Border = New FarPoint.Web.Spread.Border(BorderStyle.Double, Color.Blue)
ns1.BackColor = Color.Teal
ns1.Border = New FarPoint.Web.Spread.Border(BorderStyle.Double, Color.Red)
nsc.AddRange(New Object() {ns, ns1})
Dim c As FarPoint.Web.Spread.NamedStyle
c = nsc.Find("HeaderData")
If c.Name = "HeaderData" Then
c.BackColor = Color.Tan
End If
FpSpread1.NamedStyles.Add(c)
FpSpread1.ActiveSheetView.ColumnHeader.DefaultStyle = c