Shape.MouseWheel イベント

[アーティクル]
08/22/2008

更新 : 2007 年 11 月

図形にフォーカスがあるときにマウスホイールが動くと発生します。

名前空間 : Microsoft.VisualBasic.PowerPacks
アセンブリ : Microsoft.VisualBasic.PowerPacks.Vs (Microsoft.VisualBasic.PowerPacks.Vs.dll 内)

構文

'宣言
<BrowsableAttribute(True)> _
Public Event MouseWheel As MouseEventHandler
'使用
Dim instance As Shape
Dim handler As MouseEventHandler

AddHandler instance.MouseWheel, handler

[BrowsableAttribute(true)]
public event MouseEventHandler MouseWheel

[BrowsableAttribute(true)]
public:
 event MouseEventHandler^ MouseWheel {
    void add (MouseEventHandler^ value);
    void remove (MouseEventHandler^ value);
}

JScript では、イベントは使用できません。

解説

MouseWheel イベントの処理では、マウスホイールに関連付けられたユーザーインターフェイス (UI) 標準に従ってください。Delta プロパティ値は、マウスホイールの移動量を示します。UI は、累積デルタがプラス 120 またはマイナス 120 になると、スクロールする必要があります。UI は、到達した各デルタ値の MouseWheelScrollLines プロパティによって返された論理行数だけスクロールする必要があります。値の増減の単位を 120 より小さくすると、さらに円滑にスクロールできます。ただし、その割合は一定になるように、つまり、ホイールが 120 デルタ単位動くごとに MouseWheelScrollLines 行がスクロールされるようにする必要があります。

マウスイベントは次の順序で発生します。

MouseEnter

MouseMove

MouseHover / MouseDown / MouseWheel

MouseUp

MouseLeave

イベントの処理方法の詳細については、「イベントの利用」を参照してください。

例

MouseWheel イベントを使用して RectangleShape コントロールをスクロールする方法を次の例に示します。この例では、RectangleShape1 という名前の RectangleShape コントロールがフォームに配置されている必要があります。

Private Sub RectangleShape1_MouseWheel(ByVal sender As Object, _
 ByVal e As System.Windows.Forms.MouseEventArgs) _
 Handles RectangleShape1.MouseWheel
    ' Move the shape vertically to correspond to the scrolling of the
    ' mouse wheel.
    Dim scale As Integer = e.Delta * _
      SystemInformation.MouseWheelScrollLines / 120
    RectangleShape1.Top = RectangleShape1.Top - scale
End Sub

private void rectangleShape1_MouseWheel(object sender, 
    System.Windows.Forms.MouseEventArgs e)
{
    // Move the shape vertically to correspond to the scrolling of the
    // mouse wheel.
    int scale = e.Delta * SystemInformation.MouseWheelScrollLines / 120;
    rectangleShape1.Top = rectangleShape1.Top - scale;
}