Ideal way of using @GUI_DragID & @GUI_DropID

[TheDcoder]

Hello, I am confused about using these 2 macros

I already have a program with some ListView controls in it... I am thinking about adding drag & drop functionality to them.. but... I can't explain...

Here is my GUI:

#include-once

; -- Created with ISN Form Studio 2 for ISN AutoIt Studio -- ;
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Include <GuiButton.au3>
#include <GuiListView.au3>

Local $hGUI = GUICreate("GUI",350,215,-1,-1,-1,-1)
GUISetBkColor(0xFFFFFF,$hGUI)
Local $hListView = GUICtrlCreatelistview("Column 1|Column 2",5,7,339,169,4,544)
Local $hButtonCopy2 = GUICtrlCreateButton("Copy Column 2",245,180,100,30,-1,-1)
Local $hButtonAdd = GUICtrlCreateButton("Add ListViewItem",110,180,128,30,-1,-1)
Local $hButtonCopy1 = GUICtrlCreateButton("Copy Column 1",4,180,100,30,-1,-1)

GUISetState()

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $hButtonAdd
            GUICtrlCreateListViewItem(InputBox("Enter", "Enter text for column 1") & '|' & InputBox("Enter", "Enter text for column 2"), $hListView)
            
        Case $hButtonCopy1
            $aData = StringSplit(GUICtrlRead(GUICtrlRead($hListView)), '|')
            If IsArray($aData) = 1 Then ClipPut($aData[1]) ; Avoid error
            
        Case $hButtonCopy2
            $aData = StringSplit(GUICtrlRead(GUICtrlRead($hListView)), '|')
            If IsArray($aData) = 1 Then ClipPut($aData[2]) ; Avoid error
            
    EndSwitch
WEnd

 

So, what I need is a good example of using them in a normal my GUI with a ListView control. Thanks in Advance, TD

P.S Don't blame for using magic numbers, my GUI designer did it.

Edited May 7, 2015 by TheDcoder
Added GUI Code

[guinness]

So you have code, but would rather people create something from scratch? Doesn't really seem fair does it now!

[Melba23]

TheDcoder,

Dragging and dropping inside and between ListViews is not that easy - look in my GUIListViewEx UDF to see how I did it. If you need help to integrate the UDF into your script then do not hesitate to ask.

M23

[TheDcoder]

Doesn't really seem fair

​I know but I am busy. Will work on a simple GUI

[MikahS]

​I know but I am busy. 

​Who Isn't?! 

 

[TheDcoder]

Added the GUI

[TheDcoder]

Bump

[ahmet]

Here is a simple example.
 

expandcollapse popup

#include <GUIConstantsEx.au3>

Opt("GUIOnEventMode",1)

$hGUI=GUICreate("test",500,420)


$idListView1=GUICtrlCreateListView("Col1|Col2",10,10,200,150)
GUICtrlCreateListViewItem("1:Row1-Col1|Row1-Col2",$idListView1)
GUICtrlCreateListViewItem("1:Row2-Col1|Row2-Col2",$idListView1)

$idListView2=GUICtrlCreateListView("Col1|Col2",220,10,200,150)
GUICtrlCreateListViewItem("2:Row1-Col1|Row1-Col2",$idListView2)
GUICtrlCreateListViewItem("2:Row2-Col1|Row2-Col2",$idListView2)

$idListView3=GUICtrlCreateListView("Col1|Col2",10,170,200,150)
GUICtrlSetState(-1,$GUI_DROPACCEPTED)

$idListView4=GUICtrlCreateListView("Col1|Col2",220,170,200,150)
GUICtrlSetState(-1,$GUI_DROPACCEPTED)

GUISetOnEvent($GUI_EVENT_CLOSE,"Close")
GUISetOnEvent($GUI_EVENT_DROPPED,"DragDrop")

GUISetState()

While 1
    Sleep(10)
WEnd


Func Close()
    Exit
EndFunc

Func DragDrop()
    ConsoleWrite("DragID=" & @GUI_DragId & @CRLF)
    GUICtrlCreateListViewItem(GUICtrlRead(GUICtrlRead(@GUI_DragId)),@GUI_DropId)
EndFunc

 

[TheDcoder]

@ahmet Thanks for the nice example but,

So, what I need is a good example of using them in my GUI

​Ok ?

[ahmet]

Do you actually want to copy item into the same listview?

Edited May 8, 2015 by ahmet

[TheDcoder]

@ahmet I think you have misunderstood, The code is just a decoy. I wanted to know the ideal way of implementation of D&D in a already complete script

[TheDcoder]

Hello, I found the Ideal way (IMHO) to make your (existing) GUI Drag & Drop friendly...

All you need is:

Case $GUI_EVENT_DROPPED ; This will go in your GUI loop
    Drag_N_DropManager(@GUI_DropId, @GUI_DragFile)





Func Drag_N_DropManager($hDropID, $sDropFile) ; Your D&D Manager
    ; Modify as required
EndFunc

So implementing this method in my GUI would result in:

expandcollapse popup

#include-once

; -- Created with ISN Form Studio 2 for ISN AutoIt Studio -- ;
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Include <GuiButton.au3>
#include <GuiListView.au3>

Local $hGUI = GUICreate("GUI", 350, 215, -1, -1, -1, $WS_EX_ACCEPTFILES)
GUISetBkColor(0xFFFFFF,$hGUI)
Local $hListView = GUICtrlCreatelistview("Column 1|Column 2",5,7,339,169,4,544)
GUICtrlSetState(-1, $GUI_DROPACCEPTED)
Local $hButtonCopy2 = GUICtrlCreateButton("Copy Column 2",245,180,100,30,-1,-1)
Local $hButtonAdd = GUICtrlCreateButton("Add ListViewItem",110,180,128,30,-1,-1)
Local $hButtonCopy1 = GUICtrlCreateButton("Copy Column 1",4,180,100,30,-1,-1)

GUISetState()

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit

        Case $hButtonAdd
            GUICtrlCreateListViewItem(InputBox("Enter", "Enter text for column 1") & '|' & InputBox("Enter", "Enter text for column 2"), $hListView)

        Case $hButtonCopy1
            $aData = StringSplit(GUICtrlRead(GUICtrlRead($hListView)), '|')
            If IsArray($aData) = 1 Then ClipPut($aData[1]) ; Avoid error

        Case $hButtonCopy2
            $aData = StringSplit(GUICtrlRead(GUICtrlRead($hListView)), '|')
            If IsArray($aData) = 1 Then ClipPut($aData[2]) ; Avoid error

        Case $GUI_EVENT_DROPPED
            Drag_N_DropManager(@GUI_DropId, @GUI_DragFile)

    EndSwitch
WEnd

Func Drag_N_DropManager($hDropID, $sDropFile)
    GUICtrlCreateListViewItem(FileRead(FileOpen($sDropFile)), $hListView)

EndFunc

 

Thanks @ahmet for the Idea . Hope it may help you, TD