VB.net - drag & amp; drop et obtenir le chemin du fichier?

Je voudrais être en mesure de faire glisser un fichier/exécutable/raccourci vers une application windows form et ont à l'application de déterminer le chemin d'origine du fichier déposé puis le retourner comme une chaîne de caractères?

E. g. faites glisser une image à partir du bureau dans l'application et messagebox le chemin local de l'image.

Est-ce possible? Quelqu'un pourrait-il me fournir un exemple peut-être?

Grâce

source d'informationauteur rabbitt

  1. 32

    C'est assez facile. Suffit d'activer le drap-et-goutte par la définition de la AllowDrop propriété True et gérer les DragEnter et DragDrop événements.

    Dans le DragEnter gestionnaire d'événement, vous pouvez vérifier si les données sont du type que vous souhaitez à l'aide de la Formats classe.

    Dans le DragDrop gestionnaire d'événement, utilisez la propriété de la DataEventArgs pour recevoir les données réelles.

    Exemple:

    Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
    Me.AllowDrop = True
End Sub

Private Sub Form1_DragDrop(sender As System.Object, e As System.Windows.Forms.DragEventArgs) Handles Me.DragDrop
    Dim files() As String = e.Data.GetData(DataFormats.FileDrop)
    For Each path In files
        MsgBox(path)
    Next
End Sub

Private Sub Form1_DragEnter(sender As System.Object, e As System.Windows.Forms.DragEventArgs) Handles Me.DragEnter
    If e.Data.GetDataPresent(DataFormats.FileDrop) Then
        e.Effect = DragDropEffects.Copy
    End If
End Sub
  2. 2

    C'est juste une note pour dire que si l'Glisser-Déposer ne fonctionne pas, il pourrait être parce que vous êtes l'exécution de Visual Studio en Mode Administrateur (Windows 7, je crois). Cela a aussi à voir avec le contrôle de compte d'utilisateur actuellement fixé sur votre Windows.