PowerTools SPREAD for Windows Forms 8.0J
DecreaseShapeHeight フィールド


アクティブシェイプの高さを小さくします。
構文
'Declaration
 
Public Shared ReadOnly DecreaseShapeHeight As Object
'使用法
 
Dim value As Object
 
value = SpreadActions.DecreaseShapeHeight
public static readonly object DecreaseShapeHeight
次のサンプル コードは、フォーカスのあるシェイプの高さを小さくするのに[D]キーを使用するマップを設定します。
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.DecreaseShapeHeight); 
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.DecreaseShapeHeight)
FpSpread1.SetInputMapWhenShapeHasFocus(im)
解説

このアクションは、シェイプにフォーカスがあるときに、シェイプのサイズを上に縮小してシェイプの高さを小さくします。

シェイプにフォーカスがあるときにデフォルトでこのアクションに割り当てられているキーの組み合わせは、[Ctrl]+上矢印キーです。

独自の入力マップまたはアクションマップを定義することにより、このアクションをカスタムのキーの組み合わせに対応付けることができます。マップの詳細については、「キーボード操作」を参照してください。

参照

SpreadActions クラス
SpreadActions メンバ

開発者ガイド

シェイプの使用

 

 


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