FarPoint.Win.Spread アセンブリ > FarPoint.Win.Spread 名前空間 > SpreadActions クラス : IncreaseShapeWidth フィールド |
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.IncreaseShapeWidth); 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.IncreaseShapeWidth) FpSpread1.SetInputMapWhenShapeHasFocus(im)
このアクションは、シェイプにフォーカスがあるときに、シェイプのサイズを右に拡張してシェイプの幅を大きくします。
シェイプにフォーカスがあるときにデフォルトでこのアクションに割り当てられているキーの組み合わせは、[Ctrl]+右矢印キーです。
独自の入力マップまたはアクションマップを定義することにより、このアクションをカスタムのキーの組み合わせに対応付けることができます。マップの詳細については、「キーボード操作」を参照してください。