PowerTools SPREAD for Windows Forms 8.0J
PerformAction メソッド (Action)


アクションが発生したオブジェクト
アクションが発生したときに呼び出されます。
構文
'Declaration
 
Public MustOverride Sub PerformAction( _
   ByVal sender As Object _
) 
'使用法
 
Dim instance As Action
Dim sender As Object
 
instance.PerformAction(sender)
public abstract void PerformAction( 
   object sender
)

パラメータ

sender
アクションが発生したオブジェクト
次のサンプルコードは、ユーザーがセルの最初の文字としてマイナス記号を入力した場合、セルの背景色を赤に変更します。
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)
参照

Action クラス
Action メンバ

 

 


© 2004-2015, GrapeCity inc. All rights reserved.