Control.DragOver Událost

Definice

Obor názvů:

System.Windows.Forms

Sestavení:

System.Windows.Forms.dll

Zdroj:

Control.cs

Nastane, když je objekt přetažen přes hranice ovládacího prvku.

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 

Event Type

DragEventHandler

Příklady

Následující příklad kódu ukazuje operaci přetažení mezi dvěma ListBox ovládacími prvky. Příklad volá metodu DoDragDrop při spuštění akce přetažení. Akce přetažení se spustí, pokud se myš během události přesunula více než SystemInformation.DragSize z umístění MouseDown myši. Metoda IndexFromPoint slouží k určení indexu položky, která se má během MouseDown události přetáhnout.

Příklad také ukazuje použití vlastních kurzorů pro operaci přetažení. Příklad vyžaduje, 3dwarro.cur aby byly dva soubory kurzoru a 3dwno.curexistují v adresáři aplikace pro vlastní přetažení a bez přetažení kurzorů. Vlastní kurzory se použijí, pokud je zaškrtnuté UseCustomCursorsCheckCheckBox . Vlastní kurzory jsou nastaveny v obslužné rutině GiveFeedback události.

Stav klávesnice se vyhodnotí v DragOver obslužné rutině události vpravo ListBox, aby bylo možné určit, jaké operace přetažení bude založená na stavu kláves SHIFT, CTRL, ALT nebo CTRL+ALT. Umístění v místě, kde ListBox by došlo k poklesu, je také určeno během DragOver události. Pokud data, která se mají vypustit, nejsou String, je nastavena DragEventArgs.Effect na None hodnotu in DragDropEffects. Nakonec se stav poklesu zobrazí v sadě DropLocationLabelLabel.

Data, která se mají zahodit pro právo ListBox , jsou určena v DragDrop obslužné rutině události a String hodnota se přidá na příslušné místo v bodě ListBox. Pokud se operace přetažení přesune mimo hranice formuláře, operace přetažení se zruší v obslužné rutině QueryContinueDrag události.

Tento výňatek kódu ukazuje použití DragOver události. Podívejte se na DoDragDrop metodu kompletního příkladu kódu.

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

Poznámky

Událost DragOver se vyvolá, když se kurzor myši přesune v mezích ovládacího prvku během operace přetažení.

Následující článek popisuje, jak a kdy jsou vyvolány události související s operacemi přetažení myší.

Metoda DoDragDrop určuje ovládací prvek pod aktuálním umístěním kurzoru. Pak zkontroluje, jestli je ovládací prvek platným cílem odstranění.

Pokud je ovládací prvek platným cílem přetažení, GiveFeedback je událost vyvolána se zadaným efektem přetažení. Seznam efektů přetažení najdete v výčtu DragDropEffects .

Změny v poloze kurzoru myši, stavu klávesnice a stavu tlačítka myši jsou sledovány.

• Pokud se uživatel přesune mimo okno, DragLeave vyvolá se událost.

• Pokud myš vstoupí do jiného ovládacího prvku, DragEnter je pro tento ovládací prvek vyvolán.

• Pokud se myš přesune, ale zůstane ve stejném ovládacím prvku, DragOver vyvolá se událost.

Pokud dojde ke změně stavu klávesnice nebo tlačítka myši, QueryContinueDrag událost se vyvolá a určí, zda má pokračovat přetažením, přetažením dat nebo zrušením operace na základě hodnoty Action vlastnosti události QueryContinueDragEventArgs.

• Pokud je Continuehodnota hodnota DragAction , DragOver událost je vyvolána, aby pokračovala v operaci a GiveFeedback událost je vyvolána s novým efektem, aby bylo možné nastavit odpovídající vizuální zpětnou vazbu. Seznam platných efektů přetažení najdete ve výčtu DragDropEffects .

  Poznámka

  Události DragOver a GiveFeedback události jsou spárované tak, aby se myš pohybuje přes cíl přetažení, uživatel dostane nejvíce up-to- datum zpětné vazby na pozici myši.

• Pokud je Drophodnota DragAction , vrátí se hodnota efektu poklesu do zdroje, takže zdrojová aplikace může provést příslušnou operaci se zdrojovými daty, například vyjmout data, pokud byla operace přesunutím.

• Pokud je Cancelhodnota DragAction , DragLeave je vyvolána událost.

  Poznámka

  Vlastnosti a XY vlastnosti DragEventArgs jsou v souřadnicích obrazovky, nikoli v souřadnicích klienta. Následující řádek kódu jazyka C# převede vlastnosti na klienta Point:

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

Další informace o zpracování událostí naleznete v tématu Zpracování a vyvolávání událostí.

Viz také

• OnDragOver(DragEventArgs)