'Declaration Public Shared ReadOnly DecreaseShapeWidth As Object
'Usage Dim value As Object value = SpreadActions.DecreaseShapeWidth
public static readonly object DecreaseShapeWidth
'Declaration Public Shared ReadOnly DecreaseShapeWidth As Object
'Usage Dim value As Object value = SpreadActions.DecreaseShapeWidth
public static readonly object DecreaseShapeWidth
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.D, Keys.None); im.Put(k, FarPoint.Win.Spread.SpreadActions.DecreaseShapeWidth); 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.D, Keys.None) im.Put(k, FarPoint.Win.Spread.SpreadActions.DecreaseShapeWidth) FpSpread1.SetInputMapWhenShapeHasFocus(im)
This action, when a shape has focus, shrinks the size of the shape horizontally to the left, decreasing the width of the shape.
The default key combination assigned to this action, when the shape has focus, is the Ctrl+Left arrow key combination.
You can use this action along with a custom key combination by defining your own input or action map. For more information about maps, see Managing Keyboard Interactions.