FarPoint.Web.Spread Assembly > FarPoint.Web.Spread Namespace > NamedStyleCollectionEventArgs Class : OldStyle Property |
'Declaration Public ReadOnly Property OldStyle As NamedStyle
'Usage Dim instance As NamedStyleCollectionEventArgs Dim value As NamedStyle value = instance.OldStyle
public NamedStyle OldStyle {get;}
FarPoint.Web.Spread.NamedStyleCollection nsc; private void PageLoad(object sender, System.EventArgs e) { this.nsc = new FarPoint.Web.Spread.NamedStyleCollection(); this.nsc.Changed += new FarPoint.Web.Spread.NamedStyleCollectionEventHandler(this.nscChanged); 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}); FpSpread1.NamedStyles.Add(ns1); FpSpread1.ActiveSheetView.ColumnHeader.DefaultStyle = ns1; if(IsPostBack) { FpSpread1.ActiveSheetView.ColumnHeader.DefaultStyle = ns; } } private void nscChanged(object sender, FarPoint.Web.Spread.NamedStyleCollectionEventArgs e) { TextBox1.Text = e.OldStyle.ToString(); }
Friend WithEvents nsc As FarPoint.Web.Spread.NamedStyleCollection Private Sub PageLoad(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load nsc = New FarPoint.Web.Spread.NamedStyleCollection Dim ns As New FarPoint.Web.Spread.NamedStyle("StyleData", "HeaderDefault") 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}) FpSpread1.NamedStyles.Add(ns1) FpSpread1.ActiveSheetView.ColumnHeader.DefaultStyle = ns1 If IsPostBack Then FpSpread1.ActiveSheetView.ColumnHeader.DefaultStyle = ns End If End Sub Private Sub nscChanged(ByVal sender As Object, ByVal e As FarPoint.Web.Spread.NamedStyleCollectionEventArgs) Handles nsc.Changed TextBox1.Text = e.OldStyle.ToString() End Sub
Target Platforms: Windows 7, Windows 8, Windows 10, Windows Vista, Windows Server 2003, Windows Server 2008, Windows Server 2012, Windows XP Professional