Resets to its default value whether the user can set focus to the cell using the keyboard or mouse.
Syntax
| Visual Basic (Declaration) | |
|---|
Public Overrides Sub ResetCanFocus() |
| Visual Basic (Usage) |  Copy Code |
|---|
Dim instance As NamedStyle
instance.ResetCanFocus() |
| C# | |
|---|
public override void ResetCanFocus() |
Example
This example resets several properties to their default values.
| C# | Copy Code |
|---|
DialogResult dlg;
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.CanFocus = true;
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.NoteIndicatorColor = Color.Green;
ns.Parent = "DataAreaDefault";
ns.Renderer = new FarPoint.Win.Spread.CellType.TextCellType();
ns.TabStop = true;
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;
dlg = MessageBox.Show("Do you want to reset the named style?", "Reset", MessageBoxButtons.YesNo);
if (dlg == DialogResult.Yes)
{
ns.ResetBackColor();
ns.ResetBorder();
ns.ResetCanFocus();
ns.ResetCellType();
ns.ResetEditor();
ns.ResetFont();
ns.ResetForeColor();
ns.ResetFormatter();
ns.ResetHorizontalAlignment();
ns.ResetLocked();
ns.NoteIndicatorColor();
ns.ResetParent();
ns.ResetProperty(FarPoint.Win.Spread.SheetStyleProperty.VerticalAlignment);
ns.ResetRenderer();
ns.TabStop();
ns.ResetVerticalAlignment();
} |
| Visual Basic | Copy Code |
|---|
Dim dlg As DialogResult
Dim ns As New FarPoint.Win.Spread.NamedStyle("StyleData", "DataAreaDefault")
ns.BackColor = Color.LightBlue
ns.Border = New FarPoint.Win.LineBorder(Color.DarkBlue, 2)
ns.CanFocus = True
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.NoteIndicatorColor = Color.Green
ns.Parent = "DataAreaDefault"
ns.Renderer = New FarPoint.Win.Spread.CellType.TextCellType()
ns.TabStop = True
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
dlg = MessageBox.Show("Do you want to reset the named style?", "Reset", MessageBoxButtons.YesNo)
If dlg = DialogResult.Yes Then
ns.ResetBackColor()
ns.ResetBorder()
ns.ResetCanFocus()
ns.ResetCellType()
ns.ResetEditor()
ns.ResetFont()
ns.ResetForeColor()
ns.ResetFormatter()
ns.ResetHorizontalAlignment()
ns.ResetLocked()
ns.ResetNoteIndicatorColor()
ns.ResetParent()
ns.ResetProperty(FarPoint.Win.Spread.SheetStyleProperty.VerticalAlignment)
ns.ResetRenderer()
ns.TabStop()
ns.ResetVerticalAlignment()
End If |
Requirements
Target Platforms: Windows 7, Windows Vista SP1 or later, Windows XP SP3, Windows Server 2008 (Server Core not supported), Windows Server 2008 R2 (Server Core supported with SP1 or later), Windows Server 2003 SP2
See Also
