FarPoint.Win.Spread Assembly > FarPoint.Win.Spread Namespace > NamedStyle Class : Formatter Property |
'Declaration Public Overrides Property Formatter As IFormatter
'Usage Dim instance As NamedStyle Dim value As IFormatter instance.Formatter = value value = instance.Formatter
public override IFormatter Formatter {get; set;}
FarPoint.Win.Spread.NamedStyle ns = new FarPoint.Win.Spread.NamedStyle("StyleData", "DataAreaDefault"); ns.BackColor = Color.LightBlue; ns.Border = new FarPoint.Win.LineBorder(Color.DarkBlue, 2); ns.CellType = new FarPoint.Win.Spread.CellType.TextCellType(); ns.Editor = new FarPoint.Win.Spread.CellType.TextCellType(); ns.Font = new Font("Comic Sans Serif", 12); ns.ForeColor = Color.Red; ns.Formatter = new FarPoint.Win.Spread.CellType.TextCellType(); ns.HorizontalAlignment = FarPoint.Win.Spread.CellHorizontalAlignment.Right; ns.Locked = true; ns.Name = "StyleData"; ns.Parent = "DataAreaDefault"; ns.Renderer = new FarPoint.Win.Spread.CellType.TextCellType(); ns.VerticalAlignment = FarPoint.Win.Spread.CellVerticalAlignment.Bottom; fpSpread1.NamedStyles.Add(ns); fpSpread1.ActiveSheet.Cells[0, 0].StyleName = "StyleData"; fpSpread1.ActiveSheet.SetText(0, 0, "NamedStyle"); fpSpread1.ActiveSheet.Columns[0].Width = 120; fpSpread1.ActiveSheet.Rows[0].Height = 80;
Dim ns As New FarPoint.Win.Spread.NamedStyle("StyleData", "DataAreaDefault") ns.BackColor = Color.LightBlue ns.Border = New FarPoint.Win.LineBorder(Color.DarkBlue, 2) ns.CellType = New FarPoint.Win.Spread.CellType.TextCellType() ns.Editor = New FarPoint.Win.Spread.CellType.TextCellType() ns.Font = New Font("Comic Sans Serif", 12) ns.ForeColor = Color.Red ns.Formatter = New FarPoint.Win.Spread.CellType.TextCellType() ns.HorizontalAlignment = FarPoint.Win.Spread.CellHorizontalAlignment.Right ns.Locked = True ns.Name = "StyleData" ns.Parent = "DataAreaDefault" ns.Renderer = New FarPoint.Win.Spread.CellType.TextCellType() ns.VerticalAlignment = FarPoint.Win.Spread.CellVerticalAlignment.Bottom FpSpread1.NamedStyles.Add(ns) FpSpread1.ActiveSheet.Cells(0, 0).StyleName = "StyleData" FpSpread1.ActiveSheet.SetText(0, 0, "NamedStyle") FpSpread1.ActiveSheet.Columns(0).Width = 120 FpSpread1.ActiveSheet.Rows(0).Height = 80
Target Platforms: Windows 2000 Professional (SP4), Windows 2000 Server, Windows 2003 Server (SP1), Windows Server 2012 R2, Windows 2008, Windows XP (SP2), Windows Vista, Windows 7, Windows 8, Windows 8.1, Windows 10