Spread Windows Forms 7.0 Product Documentation
Using Input Maps with Action Maps
See Also Support Options
Spread Windows Forms 7.0 Product Documentation > Developer's Guide > Managing Keyboard Interaction > Using Input Maps with Action Maps

Glossary Item Box

Internally, the SpreadView uses an input map paired with an action map to process a keystroke. An input map (InputMap object) is used to convert a key stroke (KeyStroke object) to an object that identifies the action). An action map (ActionMap object) is used to convert the object to an action. See the examples below.

Using Code

  1. Create a new InputMap object for which to map keys and actions.
  2. Set an existing input map equal to the InputMap object you created.
  3. Use the InputMap class Put method to map specific keys to specific actions.

Example in C#

For example, the internal code that handles KeyDown events looks something like this:

C# Copy Code
object actionMapKey = GetInputMap(InputMapMode.WhenFocused).Get(newKeystroke(e.KeyCode, e.Modifiers));
if (actionMapKey != null)
{
    Action action = GetActionMap().Get(actionMapKey);
    if (action != null)
    {
        action.PerformAction(this);
        e.Handled = true;
    }
}
VB Copy Code
Dim actionMapKey As Object = GetInputMap(InputMapMode.WhenFocused).Get(New Keystroke(e.KeyCode, e.Modifiers))
If Not (actionMapKey Is Nothing) Then
    Dim action As Action = GetActionMap().Get(actionMapKey)
    If Not (action Is Nothing) Then
        action.PerformAction(Me)
        e.Handled = True
    End If
End If

Excel uses Ctl+9 and Ctl+Shift+9 to hide and unhide rows. Suppose you want to implement this feature in FarPoint Spread. You could create the following classes to define the hide and unhide actions.

C# Copy Code
private class HideRowAction : Action
{
    public override void PerformAction(object source)
    {
        if (source is SpreadView)
        {
            SpreadView spread = (SpreadView)source;
            SheetView sheet = spread.Sheets[spread.ActiveSheetIndex];
            if (sheet.SelectionCount > 0)
            {
                for (int i = 0; i < sheet.SelectionCount; i++)
                {
                CellRange range = sheet.GetSelection(i);
                if (range.Row == -1)
                 sheet.Rows[0, sheet.RowCount - 1].Visible = false;
                else
                sheet.Rows[range.Row, range.Row + range.RowCount - 1].Visible = false;
   
         }
      }
      else
      {
            sheet.Rows[sheet.ActiveRowIndex].Visible = false;
         }
       }
   }
}
   
private class UnhideRowAction : Action
{
   public override void PerformAction(object source)
   {
      if (source is SpreadView)
      {
         SpreadView spread = (SpreadView)source;
         SheetView sheet = spread.Sheets[spread.ActiveSheetIndex];
         if (sheet.SelectionCount > 0)
         {
            for (int i = 0; i < sheet.SelectionCount; i++)
            {
               CellRange range = sheet.GetSelection(i);
               if (range.Row == -1)
                  sheet.Rows[0, sheet.RowCount - 1].Visible = true;
               else
                  sheet.Rows[range.Row, range.Row + range.RowCount - 1].Visible = true;
            }
         }
         else
         {
            sheet.Rows[sheet.ActiveRowIndex].Visible = true;
         }
      }
   }
}
VB Copy Code
Private Class HideRowAction
    Inherits Action
    
    Public Overrides Sub PerformAction([source] As Object)
     If TypeOf [source] Is SpreadView Then
      Dim spread As SpreadView = CType([source], SpreadView)
      Dim sheet As SheetView = spread.Sheets(spread.ActiveSheetIndex)
      If sheet.SelectionCount > 0 Then
        Dim i As Integer
        For i = 0 To sheet.SelectionCount - 1
            Dim range As CellRange = sheet.GetSelection(i)
            If range.Row = - 1 Then
                sheet.Rows(0, sheet.RowCount - 1).Visible = False
            Else
                sheet.Rows(range.Row, range.Row + range.RowCount - 1).Visible = False    
            End If
        Next i
      Else
            sheet.Rows(sheet.ActiveRowIndex).Visible = False
      End If
     End If
    End Sub 'PerformAction
End Class 'HideRowAction
    
Private Class UnhideRowAction
    Inherits Action
    
    Public Overrides Sub PerformAction([source] As Object)
     If TypeOf [source] Is SpreadView Then
      Dim spread As SpreadView = CType([source], SpreadView)
      Dim sheet As SheetView = spread.Sheets(spread.ActiveSheetIndex)
        If sheet.SelectionCount > 0 Then
          Dim i As Integer
          For i = 0 To sheet.SelectionCount - 1
            Dim range As CellRange = sheet.GetSelection(i)
            If range.Row = - 1 Then
                sheet.Rows(0, sheet.RowCount - 1).Visible = True
            Else
                sheet.Rows(range.Row, range.Row + range.RowCount - 1).Visible = True
            End If
        Next i
     Else
        sheet.Rows(sheet.ActiveRowIndex).Visible = True
     End If
    End If
   End Sub 'PerformAction
End Class 'UnhideRowAction

You could then add the keystrokes and actions to the maps as follows.

C# Copy Code
InputMap im = spread.GetInputMap(InputMapMode.WhenFocused);
ActionMap am = spread.GetActionMap();
im.Put(new Keystroke(Keys.D9, Keys.Control), "HideRow");
im.Put(new Keystroke(Keys.D9, Keys.Control | Keys.Shift), "UnhideRow");
am.Put("HideRow", new HideRowAction());
am.Put("UnhideRow", new UnhideRowAction());
VB Copy Code
Dim im As InputMap = spread.GetInputMap(InputMapMode.WhenFocused)
Dim am As ActionMap = spread.GetActionMap()
im.Put(New Keystroke(Keys.D9, Keys.Control), "HideRow")
im.Put(New Keystroke(Keys.D9, Keys.Control Or Keys.Shift), "UnhideRow")
am.Put("HideRow", New HideRowAction())
am.Put("UnhideRow", New UnhideRowAction())

For more information, refer to the methods in ActionMap and InputMap classes.

C# Copy Code
public class FpSpread : ...{   ...
   public ActionMap GetActionMap();
   public void SetActionMap(ActionMap value);
}
   
public class SpreadView : ...
{
   ...
   public ActionMap GetActionMap();
   public void SetActionMap(ActionMap value);
}
   
public class ActionMap{   
public ActionMap();   
public object[] AllKeys();   
public object[] Keys();   
public ActionMap Parent { get; set; }   
public int Size { get; }   
public void Clear();   
public Action Get(object key);   
public void Put(object key, Action action);   
public void Remove(object key);}   
public abstract class Action{   public abstract void PerformAction(object source);}
VB Copy Code
Public Class FpSpread ...
...
Public Function GetActionMap() As ActionMap

Public Sub SetActionMap(value As ActionMap)

End Class 'FpSpread

Public Class SpreadView ...

...
Public Function GetActionMap() As ActionMap

Public Sub SetActionMap(value As ActionMap)

End Class 'SpreadView

Public Class ActionMap

Public Sub ActionMap()
Public object AllKeys()
Public object Keys()
Public ActionMap Parent
Public Size As Integer
Public Sub Clear()
Public Action Get(By key As object)
Public Sub Put(By key As object, By action As Action)
Public Sub Remove(By key As object)
}

Public MustOverride Class Action
{
Public Sub PerformAction(By source As object)
}

See Also

© 2002-2014 ComponentOne, a division of GrapeCity. All Rights Reserved.