Titel per Drag and Drop einfügen

[natan-dj]

Nur für den Test habe ich folgendes Beispiel gewählt, womit ich in die Player droppen kann:

Dim Lst1(0, 1) As String
Lst1(0, 0) = "D:\Sound\Instrumental 6\Bonnie and Clyde - Orchester Werner Müller.wav"
Lst1(0, 1) = ""
ListView1.DoDragDrop(Lst1, DragDropEffects.Copy)

Sicherlich sieht das hinterher etwas eleganter aus.

Gruß F.R.

[muntablues]

Bin kein VB Profi, aber meines Erachtens ist die Deklaration von Lst1 nicht ganz richtig...

Wenn ich C# nach VB.Net konvertiere käme sowas raus:

Dim Lst1 As String(,) = New String(0, 1) {}
Lst1(0, 0) = "D:\Sound\Instrumental 6\Bonnie and Clyde - Orchester Werner Müller.wav"
Lst1(0, 1) = ""

So denn,

[natan-dj]

Ist sicherlich die elegantere Methode, die ich später auch nutzen will. Leider aber ist das auch nicht die Lösung! Der Effekt ist der gleiche. In die beiden Player und der Playlist kann ich droppen, in die Wishlist aber nicht.

Gruß F.R.

[muntablues]

Kann eigentlich nicht sein...

Kannst du eine Schnelle Demo machen bei der ne Textbox für den Filenamen drin ist und der Drag irgendwo gestartet wird (MouseDown in der TextBox oder so)

Schick mir das Ding unter: muntablues[at]gmx.at

Dann schau ich mal was bei mir im Debugger daher kommt...

[muntablues]

Ok, habs gefunden...

Änder mal auf Folgendes, dann gehts:

TextBox1.DoDragDrop(Lst1, DragDropEffects.Copy Or DragDropEffects.Move)

In der Wishlist ist es ein wenig anders und das muss ich zuerst noch ändern. Ich hab das einfach übersehen. Bis dahin (und auch danach) sollte die oben angeführte Lösung klappen.

So denn,

[natan-dj]

Jawohl, das ist die Lösung. So habe ich mir das vorgestellt.

Herzlichen Dank für Deine übergroße Mühe.

Gruß F.R.