タイトル | : DragDropについて |
記事No | : 1379 |
投稿日 | : 2005/02/09(Wed) 10:48 |
投稿者 | : aki |
[OSのVer]:Windows [VBのVer]:VB.NET
いつもお世話になっております。
TextBoxコントロールにエクスプローラからDrag&Dropされたファイル、 またはフォルダのフルパスを取得したいのですが、下記のコードでは 取得することが出来ませんでした。 どなたかお教え願えませんか? よろしくお願いいたします。
Private Sub TextBox1_DragEnter(ByVal sender As Object, ByVal e As System.Windows.Forms.DragEventArgs) Handles TextBox1.DragEnter If (e.Data.GetDataPresent(DataFormats.FileDrop)) Then e.Effect = DragDropEffects.Copy Else e.Effect = DragDropEffects.None End If
End Sub
Private Sub TextBox1_DragDrop(ByVal sender As Object, ByVal e As System.Windows.Forms.DragEventArgs) Handles TextBox1.DragDrop Me.TextBox1.Text = CType(e.Data.GetData(DataFormats.FileDrop), String) End Sub
もちろん、TextBoxのAllowDropプロパティはTrueになってます。
|