Jag är total newbie och börjar fundera lite här..

Går det att dra och släppa tex en fil eller en katalog från utforskaren till en knapp (eller liknande) i ett vb program och sen t.ex. kunna få sökvägen utskrivet i en textbox ?

Skulle man säkert kunna göra lite kul med.

Nån som har nåt tips om hur man går tillväga ?

/mvh Lars Sandberg


EDIT: Jag hittade just svaret. Inte meningen å spamma med onödiga frågor.

Sätt OLEDropMode = vbOLEDropManual.

Här är ett exempel som visar filerna i en listbox:
<code>
Option Explicit


Private Sub List1_OLEDragDrop(Data As DataObject, Effect As Long, Button As Integer, Shift As Integer, X As Single, Y As Single)
Dim File As Variant
If Data.GetFormat(vbCFFiles) Then
List1.Clear
For Each File In Data.Files
List1.AddItem File
Next
Effect = vbDropEffectCopy
End If
End Sub

Private Sub List1_OLEDragOver(Data As DataObject, Effect As Long, Button As Integer, Shift As Integer, X As Single, Y As Single, State As Integer)
If Data.GetFormat(vbCFFiles) Then
Effect = vbDropEffectCopy
End If

End Sub
</code>

Tackar.

jag lovar att jag skall ta mer tid på mig å leta svar innan jag frågar igen.