2014-06-13 4 views
0

양식에 그림 아이콘이 있습니다. 사용자가이 아이콘을 Windows 탐색기, 바탕 화면 등으로 끌면 관련 파일이 해당 위치에 기록됩니다.VB.Net 2012 그림을 끌 때 파일 복사

나는 파일 경로를 콤보로 가지고 있으며 사용자가 드래그 할 수 있도록 양식의 이미지를 말했습니다. 이미지는 실제 파일과 관련이없는 일반 이미지입니다.

나를 도와 줄 수 있습니까? 나는 단서가 없다!

+0

먼저 그림 상자 (?)와이 파일이 나타내는 파일을 연결해야합니다. 아마도 .Tag가 작동 할 것입니다. 그 후 그것은 단지 파일 복사 또는 이동 작업입니다. – Plutonix

+0

이것은 정말로 단순한 ddrag-and-drop입니다. D-n-D가 VB.NET에서 어떻게 작동하는지 알고 있습니까? 그렇지 않다면 먼저 배우는 것이 중요합니다. 이 작업을 완료하면 기본적으로 적절한 데이터를 클립 보드에 저장하고 사용자가 드롭을하면 Windows 탐색기가 나머지를 처리합니다. http://social.msdn.microsoft.com/Search/en-AU?query=drag%20and%20drop%20other%20applications&emptyWatermark=true&ac=5 – jmcilhinney

+0

글쎄 Dragenter와 e.Data를 사용하는 것에 대해 잘 알고 있습니다. 복사 할 텍스트를 가지고 있지만 파일로 이것을 수행하는 방법을 모르는 Setdata ?? – GDutton

답변

0

다음 사람의 경우 .... 여기서 pbDragger는 그림 상자입니다. 하나의 파일 만 드래그하는 경우에도 DataObject에 문자열 배열이 필요하다는 점에 유의해야합니다.

Private Sub pbDragger_MouseMove(sender As Object, e As MouseEventArgs) Handles pbDragger.MouseMove 

    If ((e.Button And MouseButtons.Left) = MouseButtons.Left) Then 

     Dim strPath As String = cboRef.SelectedItem!Path.ToString ' Path of the file to be copied 

     Dim strArr() As String = {strPath} ' 'FileDrop requires an array of string!! 

     Dim oDraginfo As New DataObject(DataFormats.FileDrop, strArr) 
     Dim dropEffect As DragDropEffects = pbDragger.DoDragDrop(oDraginfo, DragDropEffects.Copy) 

    End If 
End Sub