Drag and Drop items between ListView using treeview ?

Question

0.00/5 (No votes)

See more:

hi All

i have 5 different Listview and one treeview .

the treeview include 5 different nodes , each node show one of the Listview .

node1 show > Listview1

node2 show > Listview2

node3 show > Listview3

node4 show > Listview4

node5 show > Listview5

what i need now to drag and drop the selected item from one of the listview to another by drop it over specific node , so the selected item moved to the listview that represented by the node.

example : if i select the itemX from listview3 and drop it over node 5 >> the result should be >> the itemx moved from listview3 to listview5.

Microsoft Visual Basic 2008 Express Edition

thanks in advance

Posted 16-Mar-14 19:42pm

Member 10491813

Add a Solution

2 solutions

Solution 1

HI,

It is very easy, you can do this using jquery

JavaScript

$(".DraggableElementClass").draggable(_
$(".DropableElementClass").droppable({
       drop: function (event, ui) {
            // droped elemet
        $(ui.draggable).closest('UL').append($(this).closest('li'));
        }
    });

Hope it will help.

Posted 16-Mar-14 19:57pm

Ehsan Skardu

Comments

Marcin Kozub 17-Mar-14 2:59am

Did you read the question??? Where he/she mention about JavaScript?
Downvote...

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

Marcin Kozub · Accepted Answer · 2014-03-16T22:12:00

Assuming that:
1. Your ListView components have names: ListView1, ListView2...ListView5
2. Your TreeView component is named: TreeView1
3. Your TreeView Nodes Text property holds name of destination ListView

VB

Private sourceListView As ListView

Private Sub ListView_MouseDown(sender As System.Object, e As System.Windows.Forms.MouseEventArgs) _
    Handles ListView1.MouseDown, ListView5.MouseDown, ListView4.MouseDown, ListView3.MouseDown, ListView2.MouseDown
    ' Store source ListView for Drag & Drop
    sourceListView = CType(sender, ListView)
End Sub

Private Sub ListView_DragOver(sender As System.Object, e As System.Windows.Forms.DragEventArgs) _
    Handles ListView1.DragOver, ListView5.DragOver, ListView4.DragOver, ListView3.DragOver, ListView2.DragOver
    e.Effect = DragDropEffects.Move
End Sub

Private Sub ListView_ItemDrag(sender As System.Object, e As System.Windows.Forms.ItemDragEventArgs) _
    Handles ListView1.ItemDrag, ListView5.ItemDrag, ListView4.ItemDrag, ListView3.ItemDrag, ListView2.ItemDrag
    ' Set selected item Text to Drag & Drop operation
    sourceListView.DoDragDrop(sourceListView.SelectedItems(0).Text, DragDropEffects.Move)
End Sub

Private Sub TreeView_DragEnter(sender As System.Object, e As System.Windows.Forms.DragEventArgs) _
    Handles TreeView1.DragEnter
    e.Effect = DragDropEffects.Move
End Sub

Private Sub TreeView_DragDrop(sender As System.Object, e As System.Windows.Forms.DragEventArgs) _
    Handles TreeView1.DragDrop
    Dim destNode As TreeNode

    ' Get destinated TreeView Node
    destNode = TreeView1.GetNodeAt(TreeView1.PointToClient(New Point(e.X, e.Y)))

    If IsNothing(destNode) Then
        Return
    End If

    ' Gets dragged text
    Dim itemText As String
    itemText = DirectCast(e.Data.GetData(DataFormats.StringFormat), String)

    ' Assuming Node.Tag contains name of destinated ListView...
    Dim destListViewName As String
    destListViewName = destNode.Text

    ' ...find it on Form
    Dim destListView As ListView
    destListView = CType(Me.Controls.Find(destListViewName, True)(0), ListView)

    ' Add item to destinated ListView...
    destListView.Items.Add(itemText)

    ' ... and remove it from source ListView
    sourceListView.Items.Remove(sourceListView.FindItemWithText(itemText))
End Sub

I hope you find this solution usefull :)