MouseButton Énumération

Définition

Définit des valeurs qui spécifient les boutons d'une souris.

public enum class MouseButton
public enum MouseButton
type MouseButton = 
Public Enum MouseButton
Héritage
MouseButton

Champs

Left 0

Bouton gauche de la souris.

Middle 1

Bouton du milieu de la souris.

Right 2

Bouton droit de la souris.

XButton1 3

Premier bouton étendu de la souris.

XButton2 4

Deuxième bouton étendu de la souris.

Exemples

L’exemple suivant crée un gestionnaire d’événements MouseDown qui utilise l’énumération MouseButton pour déterminer quel bouton a été appuyé. Selon le bouton appuyé, l’arrière-plan du contrôle qui a déclenché l’événement est modifié.

private void MouseButtonDownHandler(object sender, MouseButtonEventArgs e)
{
    Control src = e.Source as Control;

    if (src != null)
    {
        switch (e.ChangedButton)
        {
            case MouseButton.Left:
                src.Background = Brushes.Green;
                break;
            case MouseButton.Middle:
                src.Background = Brushes.Red;
                break;
            case MouseButton.Right:
                src.Background = Brushes.Yellow;
                break;
            case MouseButton.XButton1:
                src.Background = Brushes.Brown;
                break;
            case MouseButton.XButton2:
                src.Background = Brushes.Purple;
                break;
            default:
                break;
        }
    }
}
Private Sub MouseButtonDownHandler(ByVal sender As Object, ByVal e As MouseButtonEventArgs)
    Dim src As Control = TryCast(e.Source, Control)

    If src IsNot Nothing Then
        Select Case e.ChangedButton
            Case MouseButton.Left
                src.Background = Brushes.Green
            Case MouseButton.Middle
                src.Background = Brushes.Red
            Case MouseButton.Right
                src.Background = Brushes.Yellow
            Case MouseButton.XButton1
                src.Background = Brushes.Brown
            Case MouseButton.XButton2
                src.Background = Brushes.Purple
            Case Else
        End Select
    End If
End Sub

S’applique à

Voir aussi