Compartir vía


Control.DragOver Evento

Definición

Se produce cuando se arrastra un objeto sobre los límites del control.

public:
 event System::Windows::Forms::DragEventHandler ^ DragOver;
public event System.Windows.Forms.DragEventHandler DragOver;
public event System.Windows.Forms.DragEventHandler? DragOver;
member this.DragOver : System.Windows.Forms.DragEventHandler 
Public Custom Event DragOver As DragEventHandler 

Tipo de evento

Ejemplos

En el ejemplo de código siguiente se muestra una operación de arrastrar y colocar entre dos controles ListBox. En el ejemplo se llama al método DoDragDrop cuando se inicia la acción de arrastrar. La acción de arrastrar se inicia si el mouse se ha movido más de SystemInformation.DragSize desde la ubicación del mouse durante el evento MouseDown. El método IndexFromPoint se usa para determinar el índice del elemento que se va a arrastrar durante el evento MouseDown.

En el ejemplo también se muestra el uso de cursores personalizados para la operación de arrastrar y colocar. El ejemplo requiere que dos archivos de cursor, 3dwarro.cur y 3dwno.cur, existan en el directorio de la aplicación, para los cursores de arrastrar y sin colocar personalizados, respectivamente. Los cursores personalizados se usarán si se comprueba el UseCustomCursorsCheckCheckBox. Los cursores personalizados se establecen en el controlador de eventos GiveFeedback.

El estado del teclado se evalúa en el controlador de eventos DragOver de la derecha ListBox, para determinar cuál será la operación de arrastre en función del estado de las teclas MAYÚS, CTRL, ALT o CTRL+ALT. La ubicación del ListBox donde se produciría la eliminación también se determina durante el evento DragOver. Si los datos que se van a quitar no son un String, el DragEventArgs.Effect se establece en None en DragDropEffects. Por último, el estado de la colocación se muestra en el DropLocationLabelLabel.

Los datos que se van a quitar de la ListBox derecha se determinan en el controlador de eventos DragDrop y el valor de String se agrega en el lugar adecuado de la ListBox. Si la operación de arrastre se mueve fuera de los límites del formulario, la operación de arrastrar y colocar se cancela en el controlador de eventos QueryContinueDrag.

Este fragmento de código muestra el uso del evento DragOver. Consulte el método DoDragDrop para obtener el ejemplo de código completo.

void ListDragTarget_DragOver( Object^ /*sender*/, System::Windows::Forms::DragEventArgs^ e )
{
   // Determine whether string data exists in the drop data. If not, then
   // the drop effect reflects that the drop cannot occur.
   if (  !e->Data->GetDataPresent( System::String::typeid ) )
   {
      e->Effect = DragDropEffects::None;
      DropLocationLabel->Text = "None - no string data.";
      return;
   }

   // Set the effect based upon the KeyState.
   if ( (e->KeyState & (8 + 32)) == (8 + 32) && ((e->AllowedEffect & DragDropEffects::Link) == DragDropEffects::Link) )
   {
      // KeyState 8 + 32 = CTRL + ALT
      // Link drag-and-drop effect.
      e->Effect = DragDropEffects::Link;
   }
   else
   if ( (e->KeyState & 32) == 32 && ((e->AllowedEffect & DragDropEffects::Link) == DragDropEffects::Link) )
   {
      // ALT KeyState for link.
      e->Effect = DragDropEffects::Link;
   }
   else
   if ( (e->KeyState & 4) == 4 && ((e->AllowedEffect & DragDropEffects::Move) == DragDropEffects::Move) )
   {
      // SHIFT KeyState for move.
      e->Effect = DragDropEffects::Move;
   }
   else
   if ( (e->KeyState & 8) == 8 && ((e->AllowedEffect & DragDropEffects::Copy) == DragDropEffects::Copy) )
   {
      // CTRL KeyState for copy.
      e->Effect = DragDropEffects::Copy;
   }
   else
   if ( (e->AllowedEffect & DragDropEffects::Move) == DragDropEffects::Move )
   {
      // By default, the drop action should be move, if allowed.
      e->Effect = DragDropEffects::Move;
   }
   else
            e->Effect = DragDropEffects::None;





   
   // Get the index of the item the mouse is below.
   // The mouse locations are relative to the screen, so they must be
   // converted to client coordinates.
   indexOfItemUnderMouseToDrop = ListDragTarget->IndexFromPoint( ListDragTarget->PointToClient( Point(e->X,e->Y) ) );
   
   // Updates the label text.
   if ( indexOfItemUnderMouseToDrop != ListBox::NoMatches )
   {
      DropLocationLabel->Text = String::Concat( "Drops before item # ", (indexOfItemUnderMouseToDrop + 1) );
   }
   else
            DropLocationLabel->Text = "Drops at the end.";
}
private void ListDragTarget_DragOver(object sender, DragEventArgs e)
{
    // Determine whether string data exists in the drop data. If not, then
    // the drop effect reflects that the drop cannot occur.
    if (!e.Data.GetDataPresent(typeof(System.String)))
    {
        e.Effect = DragDropEffects.None;
        DropLocationLabel.Text = "None - no string data.";
        return;
    }

    // Set the effect based upon the KeyState.
    if ((e.KeyState & (8 + 32)) == (8 + 32) &&
        (e.AllowedEffect & DragDropEffects.Link) == DragDropEffects.Link)
    {
        // KeyState 8 + 32 = CTRL + ALT

        // Link drag-and-drop effect.
        e.Effect = DragDropEffects.Link;
    }
    else if ((e.KeyState & 32) == 32 &&
        (e.AllowedEffect & DragDropEffects.Link) == DragDropEffects.Link)
    {
        // ALT KeyState for link.
        e.Effect = DragDropEffects.Link;
    }
    else if ((e.KeyState & 4) == 4 &&
        (e.AllowedEffect & DragDropEffects.Move) == DragDropEffects.Move)
    {
        // SHIFT KeyState for move.
        e.Effect = DragDropEffects.Move;
    }
    else if ((e.KeyState & 8) == 8 &&
        (e.AllowedEffect & DragDropEffects.Copy) == DragDropEffects.Copy)
    {
        // CTRL KeyState for copy.
        e.Effect = DragDropEffects.Copy;
    }
    else if ((e.AllowedEffect & DragDropEffects.Move) == DragDropEffects.Move)
    {
        // By default, the drop action should be move, if allowed.
        e.Effect = DragDropEffects.Move;
    }
    else
    {
        e.Effect = DragDropEffects.None;
    }

    // Get the index of the item the mouse is below. 

    // The mouse locations are relative to the screen, so they must be 
    // converted to client coordinates.

    indexOfItemUnderMouseToDrop =
        ListDragTarget.IndexFromPoint(ListDragTarget.PointToClient(new Point(e.X, e.Y)));

    // Updates the label text.
    if (indexOfItemUnderMouseToDrop != ListBox.NoMatches)
    {
        DropLocationLabel.Text = "Drops before item #" + (indexOfItemUnderMouseToDrop + 1);
    }
    else
    {
        DropLocationLabel.Text = "Drops at the end.";
    }
}
Private Sub ListDragTarget_DragOver(ByVal sender As Object, ByVal e As DragEventArgs) Handles ListDragTarget.DragOver
    ' Determine whether string data exists in the drop data. If not, then
    ' the drop effect reflects that the drop cannot occur.
    If Not (e.Data.GetDataPresent(GetType(System.String))) Then

        e.Effect = DragDropEffects.None
        DropLocationLabel.Text = "None - no string data."
        Return
    End If

    ' Set the effect based upon the KeyState.
    If ((e.KeyState And (8 + 32)) = (8 + 32) And
        (e.AllowedEffect And DragDropEffects.Link) = DragDropEffects.Link) Then
        ' KeyState 8 + 32 = CTRL + ALT

        ' Link drag-and-drop effect.
        e.Effect = DragDropEffects.Link

    ElseIf ((e.KeyState And 32) = 32 And
        (e.AllowedEffect And DragDropEffects.Link) = DragDropEffects.Link) Then

        ' ALT KeyState for link.
        e.Effect = DragDropEffects.Link

    ElseIf ((e.KeyState And 4) = 4 And
        (e.AllowedEffect And DragDropEffects.Move) = DragDropEffects.Move) Then

        ' SHIFT KeyState for move.
        e.Effect = DragDropEffects.Move

    ElseIf ((e.KeyState And 8) = 8 And
        (e.AllowedEffect And DragDropEffects.Copy) = DragDropEffects.Copy) Then

        ' CTRL KeyState for copy.
        e.Effect = DragDropEffects.Copy

    ElseIf ((e.AllowedEffect And DragDropEffects.Move) = DragDropEffects.Move) Then

        ' By default, the drop action should be move, if allowed.
        e.Effect = DragDropEffects.Move

    Else
        e.Effect = DragDropEffects.None
    End If

    ' Gets the index of the item the mouse is below. 

    ' The mouse locations are relative to the screen, so they must be 
    ' converted to client coordinates.

    indexOfItemUnderMouseToDrop =
        ListDragTarget.IndexFromPoint(ListDragTarget.PointToClient(New Point(e.X, e.Y)))

    ' Updates the label text.
    If (indexOfItemUnderMouseToDrop <> ListBox.NoMatches) Then
        DropLocationLabel.Text = "Drops before item #" & (indexOfItemUnderMouseToDrop + 1)
    Else
        DropLocationLabel.Text = "Drops at the end."
    End If

End Sub

Comentarios

El evento DragOver se genera cuando el cursor del mouse se mueve dentro de los límites del control durante una operación de arrastrar y colocar.

A continuación se describe cómo y cuándo se generan eventos relacionados con las operaciones de arrastrar y colocar.

El método DoDragDrop determina el control bajo la ubicación actual del cursor. A continuación, comprueba si el control es un destino de colocación válido.

Si el control es un destino de colocación válido, el evento GiveFeedback se genera con el efecto de arrastrar y colocar especificado. Para obtener una lista de efectos de arrastrar y colocar, consulte la enumeración DragDropEffects.

Se realiza un seguimiento de los cambios en la posición del cursor del mouse, el estado del teclado y el estado del botón del mouse.

  • Si el usuario sale de una ventana, se genera el evento DragLeave.

  • Si el mouse entra en otro control, se genera el DragEnter de ese control.

  • Si el mouse se mueve pero permanece dentro del mismo control, se genera el evento DragOver.

Si hay un cambio en el estado del teclado o del botón del mouse, se genera el evento QueryContinueDrag y determina si se va a continuar con la arrastrar, colocar los datos o cancelar la operación en función del valor de la propiedad Action del QueryContinueDragEventArgsdel evento.

  • Si el valor de DragAction valor es Continue, se genera el evento DragOver para continuar con la operación y el evento GiveFeedback se genera con el nuevo efecto para que se puedan establecer los comentarios visuales adecuados. Para obtener una lista de efectos de colocación válidos, consulte la enumeración DragDropEffects.

    Nota

    Los eventos DragOver y GiveFeedback se emparejan para que, a medida que el mouse se mueva a través del destino de colocación, el usuario recibe los comentarios más up-to-date en la posición del mouse.

  • Si el valor de DragAction es Drop, el valor de efecto de colocación se devuelve al origen, por lo que la aplicación de origen puede realizar la operación adecuada en los datos de origen; Por ejemplo, corte los datos si la operación era un movimiento.

  • Si el valor de DragAction es Cancel, se genera el evento DragLeave.

    Nota

    Las propiedades X y Y del DragEventArgs están en coordenadas de pantalla, no en coordenadas de cliente. La siguiente línea de código de C# convierte las propiedades en un cliente Point:

    Point clientPoint = targetControl.PointToClient(new Point(de. X, de. Y));

Para obtener más información sobre cómo controlar eventos, vea control y generación de eventos.

Se aplica a

Consulte también