Avatar billede dollas Nybegynder
24. august 2004 - 12:19 Der er 8 kommentarer og
1 løsning

drag / drop spørgsmål

Hvis jeg læser en dragdrop fra f.eks desktoppen med:

Private Sub ListView1_dragdrop(ByVal sender As System.Object, ByVal e As DragEventArgs) Handles ListView1.DragDrop
        'MsgBox(e.Data.GetData(DataFormats.FileDrop))
        If (e.Data.GetDataPresent(DataFormats.FileDrop)) Then

end if
end sub



Hvordan gør jeg så lige når der skal laves en event på en drag fra mit program til en drop på f.eks desktoppen?
Avatar billede wisen Nybegynder
24. august 2004 - 12:59 #1
her er der en OK artikel om Drag/Drop - i C# :)

http://www.c-sharpcorner.com/winforms/DragDropInCSharp.asp
Avatar billede dollas Nybegynder
24. august 2004 - 13:00 #2
Ja, og jeg bruger så VB :)
Avatar billede arne_v Ekspert
24. august 2004 - 22:10 #3
Der findes værktøjer som kan oversætte mellem C# og VB.NET (mere eller mindre
godt selvfølgeligt).

Selve substansen i spørgsmålet ligget langt over mit niveau (jeg er ikke GUI mand).
Avatar billede wisen Nybegynder
25. august 2004 - 09:04 #4
.. du skal kort sagt bruge metoden "DoDragDrop" som bla. tager et objekt som argument... du skal bare være sikker på at det objektet har et type som desktoppen kender.
Avatar billede dollas Nybegynder
25. august 2004 - 09:54 #5
Ja, det er KUN filer

Jeg har lavet så man kan smide filer ind, så jeg får en fil eller mappe navn og så har jeg det, som jeg bruger til noget copy... MEn den anden vej...

forstår du?
Avatar billede dollas Nybegynder
25. august 2004 - 09:54 #6
Jeg skal bare have stien hvor man drager fra min app
Avatar billede bernhof Nybegynder
14. september 2004 - 10:25 #7
Så fandt jeg den endelig:

Private Sub ListView1_ItemDrag(ByVal sender As Object, ByVal e As System.Windows.Forms.ItemDragEventArgs) Handles ListView1.ItemDrag
    If ListView1.SelectedItems.Count > 0 Then
      Dim strFilesPath() As String
      ReDim strFilesPath(ListView1.SelectedItems.Count - 1)
      For i As Integer = 0 To ListView1.SelectedItems.Count - 1
        strFilesPath(i) = ListView1.SelectedItems(i).Text
      Next
      Dim dt As DataObject = New DataObject(DataFormats.FileDrop, strFilesPath)
      ListView1.DoDragDrop(dt, DragDropEffects.Copy)
    End If
  End Sub

Læg mærke til den 3. nederste linie, hvor der står DragDropEffects.Copy. Dette ændrer du til DragDropEffects.Move, hvis du gerne vil have flyttet filen fra sin oprindelige placering, og ikke kopieret den.
Avatar billede dollas Nybegynder
14. september 2004 - 10:27 #8
Hvor i landet bor du? Hvis du kommer til amager giver jeg en øl :)
Avatar billede bernhof Nybegynder
14. september 2004 - 10:43 #9
Hehe, jeg bor i Holbæk, men arbejder i København ;)
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester