Aracılığıyla paylaş


MouseButton Sabit listesi

Tanım

Fare cihazındaki düğmeleri belirten değerleri tanımlar.

public enum class MouseButton
public enum MouseButton
type MouseButton = 
Public Enum MouseButton
Devralma
MouseButton

Alanlar

Left 0

Sol fare düğmesi.

Middle 1

Ortadaki fare düğmesi.

Right 2

Sağ fare düğmesi.

XButton1 3

İlk genişletilmiş fare düğmesi.

XButton2 4

İkinci genişletilmiş fare düğmesi.

Örnekler

Aşağıdaki örnek, hangi düğmeye basıldığını belirlemek için numaralandırmayı MouseButton kullanan bir MouseDown olay işleyicisi oluşturur. Hangi düğmeye basıldığına bağlı olarak, olayı tetikleyen denetimin arka planı değiştirilir.

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

Şunlara uygulanır

Ayrıca bkz.