FarPoint.Win.SpreadJ アセンブリ > FarPoint.Win.Spread 名前空間 > SpreadActions クラス : IncreaseShapeHeight フィールド |
'Declaration
Public Shared ReadOnly IncreaseShapeHeight As Object
'使用法
Dim value As Object value = SpreadActions.IncreaseShapeHeight
public static readonly object IncreaseShapeHeight
FarPoint.Win.Spread.DrawingSpace.ArrowShape arrow = new FarPoint.Win.Spread.DrawingSpace.ArrowShape(); arrow.Parent = fpSpread1; arrow.SetBounds(10, 10, 50, 50); fpSpread1.ActiveSheet.AddShape(arrow); FarPoint.Win.Spread.DrawingSpace.ArrowShape crv = new FarPoint.Win.Spread.DrawingSpace.CurvedArrowShape(); crv.Parent = fpSpread1; crv.SetBounds(10, 10, 50, 50); fpSpread1.ActiveSheet.AddShape(crv); FarPoint.Win.Spread.InputMap im; im = fpSpread1.GetInputMapWhenShapeHasFocus(); FarPoint.Win.Spread.Keystroke k = new FarPoint.Win.Spread.Keystroke(Keys.I, Keys.None); im.Put(k, FarPoint.Win.Spread.SpreadActions.IncreaseShapeHeight); fpSpread1.SetInputMapWhenShapeHasFocus(im);
Dim arrow As New FarPoint.Win.Spread.DrawingSpace.ArrowShape arrow.Parent = FpSpread1 arrow.SetBounds(10, 10, 50, 50) FpSpread1.ActiveSheet.AddShape(arrow) Dim crv As New FarPoint.Win.Spread.DrawingSpace.CurvedArrowShape crv.Parent = FpSpread1 crv.SetBounds(70, 10, 50, 50) FpSpread1.ActiveSheet.AddShape(crv) Dim im As FarPoint.Win.Spread.InputMap im = FpSpread1.GetInputMapWhenShapeHasFocus() Dim k As New FarPoint.Win.Spread.Keystroke(Keys.I, Keys.None) im.Put(k, FarPoint.Win.Spread.SpreadActions.IncreaseShapeHeight) FpSpread1.SetInputMapWhenShapeHasFocus(im)
このアクションは、シェイプにフォーカスがあるときに、シェイプのサイズを下に拡張してシェイプの高さを大きくします。
シェイプにフォーカスがあるときにデフォルトでこのアクションに割り当てられているキーの組み合わせは、[Ctrl]+下矢印キーです。
独自の入力マップまたはアクションマップを定義することにより、このアクションをカスタムのキーの組み合わせに対応付けることができます。マップの詳細については、「キーボード操作」を参照してください。