Spread Windows Forms 11.0 Product Documentation
PerformAction Method (Action)
Example 


FarPoint.Win.Spread Assembly > FarPoint.Win.Spread Namespace > Action Class : PerformAction Method
Object on which the action occurred
Invoked when an action occurs.
Syntax
'Declaration
 
Public MustOverride Sub PerformAction( _
   ByVal sender As Object _
) 
'Usage
 
Dim instance As Action
Dim sender As Object
 
instance.PerformAction(sender)
public abstract void PerformAction( 
   object sender
)

Parameters

sender
Object on which the action occurred
Example
This example changes the background color of the cell to red if the user types a minus sign as the first character in the cell.
public class ColorAction : FarPoint.Win.Spread.Action
{
       public override void PerformAction(object sender)
       {
              if (sender is FarPoint.Win.Spread.SpreadView)
              {
                     FarPoint.Win.Spread.SpreadView spread = (FarPoint.Win.Spread.SpreadView)sender;
                     FarPoint.Win.Spread.SheetView sheet = spread.Sheets[spread.ActiveSheetIndex];
                     sheet.Cells[sheet.ActiveRowIndex, sheet.ActiveColumnIndex].BackColor = Color.Red;
              }
       }
}

FarPoint.Win.Spread.InputMap im = fpSpread1.GetInputMap(FarPoint.Win.Spread.InputMapMode.WhenFocused);
FarPoint.Win.Spread.ActionMap am = fpSpread1.GetActionMap();
im.Put(new FarPoint.Win.Spread.Keystroke(Keys.OemMinus, Keys.None), "ColorAction");
am.Put("ColorAction", new ColorAction());
Public Class ColorAction
Inherits FarPoint.Win.Spread.Action

Public Overrides Sub PerformAction(ByVal sender As Object)
If TypeOf sender Is FarPoint.Win.Spread.SpreadView Then
Dim spread As FarPoint.Win.Spread.SpreadView = CType(sender, FarPoint.Win.Spread.SpreadView)
Dim sheet As FarPoint.Win.Spread.SheetView = spread.Sheets(spread.ActiveSheetIndex)
sheet.Cells(sheet.ActiveRowIndex, sheet.ActiveColumnIndex).BackColor = Color.Red
End If
End Sub
End Class

Dim im As FarPoint.Win.Spread.InputMap = fpSpread1.GetInputMap(FarPoint.Win.Spread.InputMapMode.WhenFocused)
Dim am As FarPoint.Win.Spread.ActionMap = fpSpread1.GetActionMap()
im.Put(New FarPoint.Win.Spread.Keystroke(Keys.OemMinus, Keys.None), "ColorAction")
am.Put("ColorAction", New ColorAction)
See Also

Reference

Action Class
Action Members