Control.MouseButtons Propiedad
Definición
Importante
Parte de la información hace referencia a la versión preliminar del producto, que puede haberse modificado sustancialmente antes de lanzar la versión definitiva. Microsoft no otorga ninguna garantía, explícita o implícita, con respecto a la información proporcionada aquí.
Obtiene un valor que indica cuál de los botones del mouse está presionado.
public:
static property System::Windows::Forms::MouseButtons MouseButtons { System::Windows::Forms::MouseButtons get(); };
public static System.Windows.Forms.MouseButtons MouseButtons { get; }
static member MouseButtons : System.Windows.Forms.MouseButtons
Public Shared ReadOnly Property MouseButtons As MouseButtons
Valor de propiedad
Una combinación bit a bit de los valores de la enumeración MouseButtons. De manera predeterminada, es None.
Ejemplos
En el ejemplo de código siguiente se muestra cómo usar los BackColormiembros , RectangleToScreen, PointToScreenMouseButtons, , ControlPaint.DrawReversibleFramey Rectangle.IntersectsWith . Para ejecutar el ejemplo, pegue el código siguiente en un formulario denominado Form1 que contiene varios controles. En este ejemplo se requiere que los MouseDowneventos , MouseMovey MouseUp estén conectados a los controladores de eventos definidos en el ejemplo.
private:
// The following three methods will draw a rectangle and allow
// the user to use the mouse to resize the rectangle. If the
// rectangle intersects a control's client rectangle, the
// control's color will change.
bool isDrag;
Rectangle theRectangle;
Point startPoint;
void Form1_MouseDown( Object^ sender, System::Windows::Forms::MouseEventArgs^ e )
{
// Set the isDrag variable to true and get the starting point
// by using the PointToScreen method to convert form
// coordinates to screen coordinates.
if ( e->Button == ::MouseButtons::Left )
{
isDrag = true;
}
Control^ control = dynamic_cast<Control^>(sender);
// Calculate the startPoint by using the PointToScreen
// method.
startPoint = control->PointToScreen( Point(e->X,e->Y) );
}
void Form1_MouseMove( Object^ /*sender*/, System::Windows::Forms::MouseEventArgs^ e )
{
// If the mouse is being dragged,
// undraw and redraw the rectangle as the mouse moves.
if ( isDrag )
{
ControlPaint::DrawReversibleFrame( theRectangle, this->BackColor, FrameStyle::Dashed );
// Calculate the endpoint and dimensions for the new
// rectangle, again using the PointToScreen method.
Point endPoint = this->PointToScreen( Point(e->X,e->Y) );
int width = endPoint.X - startPoint.X;
int height = endPoint.Y - startPoint.Y;
theRectangle = Rectangle(startPoint.X,startPoint.Y,width,height);
// Draw the new rectangle by calling DrawReversibleFrame
// again.
ControlPaint::DrawReversibleFrame( theRectangle, this->BackColor, FrameStyle::Dashed );
}
}
void Form1_MouseUp( Object^ /*sender*/, System::Windows::Forms::MouseEventArgs^ /*e*/ )
{
// If the MouseUp event occurs, the user is not dragging.
isDrag = false;
// Draw the rectangle to be evaluated. Set a dashed frame style
// using the FrameStyle enumeration.
ControlPaint::DrawReversibleFrame( theRectangle, this->BackColor, FrameStyle::Dashed );
// Find out which controls intersect the rectangle and
// change their color. The method uses the RectangleToScreen
// method to convert the Control's client coordinates
// to screen coordinates.
Rectangle controlRectangle;
for ( int i = 0; i < Controls->Count; i++ )
{
controlRectangle = Controls[ i ]->RectangleToScreen( Controls[ i ]->ClientRectangle );
if ( controlRectangle.IntersectsWith( theRectangle ) )
{
Controls[ i ]->BackColor = Color::BurlyWood;
}
}
// Reset the rectangle.
theRectangle = Rectangle(0,0,0,0);
}
// The following three methods will draw a rectangle and allow
// the user to use the mouse to resize the rectangle. If the
// rectangle intersects a control's client rectangle, the
// control's color will change.
bool isDrag = false;
Rectangle theRectangle = new Rectangle(new Point(0, 0), new Size(0, 0));
Point startPoint;
private void Form1_MouseDown(object sender,
System.Windows.Forms.MouseEventArgs e)
{
// Set the isDrag variable to true and get the starting point
// by using the PointToScreen method to convert form
// coordinates to screen coordinates.
if (e.Button==MouseButtons.Left)
{
isDrag = true;
}
Control control = (Control) sender;
// Calculate the startPoint by using the PointToScreen
// method.
startPoint = control.PointToScreen(new Point(e.X, e.Y));
}
private void Form1_MouseMove(object sender,
System.Windows.Forms.MouseEventArgs e)
{
// If the mouse is being dragged,
// undraw and redraw the rectangle as the mouse moves.
if (isDrag)
// Hide the previous rectangle by calling the
// DrawReversibleFrame method with the same parameters.
{
ControlPaint.DrawReversibleFrame(theRectangle,
this.BackColor, FrameStyle.Dashed);
// Calculate the endpoint and dimensions for the new
// rectangle, again using the PointToScreen method.
Point endPoint = ((Control) sender).PointToScreen(new Point(e.X, e.Y));
int width = endPoint.X-startPoint.X;
int height = endPoint.Y-startPoint.Y;
theRectangle = new Rectangle(startPoint.X,
startPoint.Y, width, height);
// Draw the new rectangle by calling DrawReversibleFrame
// again.
ControlPaint.DrawReversibleFrame(theRectangle,
this.BackColor, FrameStyle.Dashed);
}
}
private void Form1_MouseUp(object sender,
System.Windows.Forms.MouseEventArgs e)
{
// If the MouseUp event occurs, the user is not dragging.
isDrag = false;
// Draw the rectangle to be evaluated. Set a dashed frame style
// using the FrameStyle enumeration.
ControlPaint.DrawReversibleFrame(theRectangle,
this.BackColor, FrameStyle.Dashed);
// Find out which controls intersect the rectangle and
// change their color. The method uses the RectangleToScreen
// method to convert the Control's client coordinates
// to screen coordinates.
Rectangle controlRectangle;
for(int i = 0; i < Controls.Count; i++)
{
controlRectangle = Controls[i].RectangleToScreen
(Controls[i].ClientRectangle);
if (controlRectangle.IntersectsWith(theRectangle))
{
Controls[i].BackColor = Color.BurlyWood;
}
}
// Reset the rectangle.
theRectangle = new Rectangle(0, 0, 0, 0);
}
' The following three methods will draw a rectangle and allow
' the user to use the mouse to resize the rectangle. If the
' rectangle intersects a control's client rectangle, the
' control's color will change.
Dim isDrag As Boolean = False
Dim theRectangle As New rectangle(New Point(0, 0), New Size(0, 0))
Dim startPoint As Point
Private Sub Form1_MouseDown(ByVal sender As Object, ByVal e As _
System.Windows.Forms.MouseEventArgs) Handles MyBase.MouseDown
' Set the isDrag variable to true and get the starting point
' by using the PointToScreen method to convert form coordinates to
' screen coordinates.
If (e.Button = MouseButtons.Left) Then
isDrag = True
End If
Dim control As Control = CType(sender, Control)
' Calculate the startPoint by using the PointToScreen
' method.
startPoint = control.PointToScreen(New Point(e.X, e.Y))
End Sub
Private Sub Form1_MouseMove(ByVal sender As Object, ByVal e As _
System.Windows.Forms.MouseEventArgs) Handles MyBase.MouseMove
' If the mouse is being dragged, undraw and redraw the rectangle
' as the mouse moves.
If (isDrag) Then
' Hide the previous rectangle by calling the DrawReversibleFrame
' method with the same parameters.
ControlPaint.DrawReversibleFrame(theRectangle, Me.BackColor, _
FrameStyle.Dashed)
' Calculate the endpoint and dimensions for the new rectangle,
' again using the PointToScreen method.
Dim endPoint As Point = CType(sender, Control).PointToScreen(New Point(e.X, e.Y))
Dim width As Integer = endPoint.X - startPoint.X
Dim height As Integer = endPoint.Y - startPoint.Y
theRectangle = New Rectangle(startPoint.X, startPoint.Y, _
width, height)
' Draw the new rectangle by calling DrawReversibleFrame again.
ControlPaint.DrawReversibleFrame(theRectangle, Me.BackColor, _
FrameStyle.Dashed)
End If
End Sub
Private Sub Form1_MouseUp(ByVal sender As Object, ByVal e As _
System.Windows.Forms.MouseEventArgs) Handles MyBase.MouseUp
' If the MouseUp event occurs, the user is not dragging.
isDrag = False
' Draw the rectangle to be evaluated. Set a dashed frame style
' using the FrameStyle enumeration.
ControlPaint.DrawReversibleFrame(theRectangle, Me.BackColor, _
FrameStyle.Dashed)
' Find out which controls intersect the rectangle and change their color.
' The method uses the RectangleToScreen method to convert the
' Control's client coordinates to screen coordinates.
Dim i As Integer
Dim controlRectangle As Rectangle
For i = 0 To Controls.Count - 1
controlRectangle = Controls(i).RectangleToScreen _
(Controls(i).ClientRectangle)
If controlRectangle.IntersectsWith(theRectangle) Then
Controls(i).BackColor = Color.BurlyWood
End If
Next
' Reset the rectangle.
theRectangle = New Rectangle(0, 0, 0, 0)
End Sub