Moving ListViewItems up and down

[Nanaki]

Topic says it all.

I want to create a ListView with two buttons "up" and "down". Clicking them will move the selected ListViewItem up or down. Is it possible?

Thanks in advance,

[Gyzmok]

I did something like that in this tool (see screenshot) :

http://www.autoitscript.com/forum/index.php?showtopic=26457

This is an example for 4 columns (the first column is a checkbox)

Looks like this :

expandcollapse popup

Func _upmove()
    if _GUICtrlListViewGetSelectedCount ($mylist) = 1 and _GUICtrlListViewGetSelectedIndices ($mylist) <> 0  then
        $curindex = _GUICtrlListViewGetSelectedIndices ($mylist)
        $col0 = _GUICtrlListViewGetCheckedState($mylist,$curindex-1)
        $col1 = _GUICtrlListViewGetItemText ($mylist,$curindex-1,1)
        $col2 = _GUICtrlListViewGetItemText ($mylist,$curindex-1,2)
        $col3 = _GUICtrlListViewGetItemText ($mylist,$curindex-1,3)
        _GUICtrlListViewSetCheckState ($mylist,$curindex-1,_GUICtrlListViewGetCheckedState($mylist,$curindex+0))
        _GUICtrlListViewSetItemText ($mylist,$curindex-1,1,_GUICtrlListViewGetItemText ($mylist,$curindex+0,1))
        _GUICtrlListViewSetItemText ($mylist,$curindex-1,2,_GUICtrlListViewGetItemText ($mylist,$curindex+0,2))
        _GUICtrlListViewSetItemText ($mylist,$curindex-1,3,_GUICtrlListViewGetItemText ($mylist,$curindex+0,3))
;
        _GUICtrlListViewSetCheckState($mylist,$curindex-0,$col0)
        _GUICtrlListViewSetItemText ($mylist,$curindex-0,1,$col1)
        _GUICtrlListViewSetItemText ($mylist,$curindex-0,2,$col2)
        _GUICtrlListViewSetItemText ($mylist,$curindex-0,3,$col3)
;
        _GUICtrlListViewSetItemSelState ($mylist,$curindex-1,1)
        _GUICtrlListViewSetItemSelState ($mylist,$curindex-0,0)
    EndIf
EndFunc;==>_upmove
;
Func _downmove()
    if _GUICtrlListViewGetSelectedCount ($mylist) = 1 and _GUICtrlListViewGetSelectedIndices ($mylist) <> _GUICtrlListViewGetItemCount($mylist)-1 then
        $curindex = _GUICtrlListViewGetSelectedIndices ($mylist)
        $col0 = _GUICtrlListViewGetCheckedState($mylist,$curindex+1)
        $col1 = _GUICtrlListViewGetItemText ($mylist,$curindex+1,1)
        $col2 = _GUICtrlListViewGetItemText ($mylist,$curindex+1,2)
        $col3 = _GUICtrlListViewGetItemText ($mylist,$curindex+1,3)
        _GUICtrlListViewSetCheckState ($mylist,$curindex+1,_GUICtrlListViewGetCheckedState($mylist,$curindex+0))
        _GUICtrlListViewSetItemText ($mylist,$curindex+1,1,_GUICtrlListViewGetItemText ($mylist,$curindex+0,1))
        _GUICtrlListViewSetItemText ($mylist,$curindex+1,2,_GUICtrlListViewGetItemText ($mylist,$curindex+0,2))
        _GUICtrlListViewSetItemText ($mylist,$curindex+1,3,_GUICtrlListViewGetItemText ($mylist,$curindex+0,3))
;
        _GUICtrlListViewSetCheckState($mylist,$curindex-0,$col0)
        _GUICtrlListViewSetItemText ($mylist,$curindex-0,1,$col1)
        _GUICtrlListViewSetItemText ($mylist,$curindex-0,2,$col2)
        _GUICtrlListViewSetItemText ($mylist,$curindex-0,3,$col3)
;
        _GUICtrlListViewSetItemSelState ($mylist,$curindex+1,1)
        _GUICtrlListViewSetItemSelState ($mylist,$curindex-0,0)
    EndIf
EndFunc;==>_downmove

Edited June 2, 2006 by Gyzmok

[Aceguy]

i fink i simplified it a bit.

Case $msg = $up
                
                If _GUICtrlListViewGetSelectedCount($listview) = 1 And _GUICtrlListViewGetSelectedIndices($listview) + 1 > 1 Then
                    $curindex = _GUICtrlListViewGetSelectedIndices($listview)
                    For $x = 0 To _GUICtrlListViewGetSubItemsCount($listview)
                        $x_i = _GUICtrlListViewGetItemText($listview, $curindex - 1, $x)
                        _GUICtrlListViewSetItemText($listview, $curindex - 1, $x, _GUICtrlListViewGetItemText($listview, $curindex + 0, $x))
                        _GUICtrlListViewSetItemText($listview, $curindex - 0, $x, $x_i)
                    Next
                    _GUICtrlListViewSetItemSelState($listview, $curindex - 1, 1)
                    _GUICtrlListViewSetItemSelState($listview, $curindex - 0, 0)
                EndIf
                
            Case $msg = $down
                
                If _GUICtrlListViewGetSelectedCount($listview) = 1 And _GUICtrlListViewGetSelectedIndices($listview) + 1 < _GUICtrlListViewGetItemCount($listview) Then
                    $curindex = _GUICtrlListViewGetSelectedIndices($listview)
                    For $x = 0 To _GUICtrlListViewGetSubItemsCount($listview)
                        $x_i = _GUICtrlListViewGetItemText($listview, $curindex + 1, $x)
                        _GUICtrlListViewSetItemText($listview, $curindex + 1, $x, _GUICtrlListViewGetItemText($listview, $curindex + 0, $x))
                        _GUICtrlListViewSetItemText($listview, $curindex - 0, $x, $x_i)
                    Next
                    _GUICtrlListViewSetItemSelState($listview, $curindex + 1, 1)
                    _GUICtrlListViewSetItemSelState($listview, $curindex - 0, 0)
                EndIf

[florisch]

I did not test that, but how about this:

- get text of selected item

- get index of selected item

- delete selected item

- insert new item with text at desired position

The functions to do this exist:

_GUICtrlListViewGetItemText($h_listview[, $i_Item=-1[, $i_SubItem=-1]])

_GUICtrlListViewGetSelectedIndices($h_listview[, $i_ReturnType=0]))

_GUICtrlListViewDeleteItem($h_listview, $i_index)

_GUICtrlListViewInsertItem($h_listview, $i_index, $s_text)

[MrCreatoR]

Hi,

Here is the quickly, and i think most effective way to do this:

#include <GUIConstants.au3>
#include <GuiListView.au3>

$Gui = GUICreate('Test Up&Down ListView', 300, 300)

$Listview = GUICtrlCreateListView("Column1|Column2", 20, 20)
For $i = 1 To 5
    GUICtrlCreateListViewItem("Item "&$i&"|Item "&$i&" subtext", $Listview)
Next

$Up = GUICtrlCreateButton("Up", 20, 180)
$Down = GUICtrlCreateButton("Down", 90, 180)

GUISetState()

While 1
    $msg = GUIGetMsg()
    Switch $msg
        Case -3
            ExitLoop
        Case $Up
            $Index = _GUICtrlListViewGetCurSel($Listview)
            $SelText = _GUICtrlListViewGetItemText($Listview)
            If $SelText = "" Or $Index = 0 Then ContinueLoop
            _GUICtrlListViewDeleteItem($Listview, $Index)
            _GUICtrlListViewInsertItem($Listview, $Index-1, $SelText)
            ControlListView($Gui, "", $Listview, "Select", $Index-1, $Index-1)
        Case $Down
            $Index = _GUICtrlListViewGetCurSel($Listview)
            $SelText = _GUICtrlListViewGetItemText($Listview)
            If $SelText = "" Or $Index+1 = _GUICtrlListViewGetItemCount($Listview) Then ContinueLoop
            _GUICtrlListViewDeleteItem($Listview, $Index)
            _GUICtrlListViewInsertItem($Listview, $Index+1, $SelText)
            ControlListView($Gui, "", $Listview, "Select", $Index+1, $Index+1)
    EndSwitch
WEnd

[florisch]

Hi,

Here is the quickly, and i think most effective way to do this:

Thanks, thats exactly what I thought about. This was not on my to do list, but nice to have. Therefore I must admit that I will use your code.

One little change: since I dont like large GUI message loops, I put the 6 lines of interest in a function:

#include <GUIConstants.au3>
#include <GuiListView.au3>

$Gui = GUICreate('Test Up&Down ListView', 300, 300)
$Listview = GUICtrlCreateListView("Column1|Column2", 20, 20)
For $i = 1 To 5
    GUICtrlCreateListViewItem("Item "&$i&"|Item "&$i&" subtext", $Listview)
Next
$Up = GUICtrlCreateButton("Up", 20, 180)
$Down = GUICtrlCreateButton("Down", 90, 180)
GUISetState()

While 1
    $msg = GUIGetMsg()
    Switch $msg
        Case -3
            ExitLoop
        Case $Up
            _updown(-1)
        Case $Down
            _updown( 1)
    EndSwitch
WEnd

func _updown($i)
    $Index = _GUICtrlListViewGetCurSel($Listview)
    $SelText = _GUICtrlListViewGetItemText($Listview)
    If ($SelText = "") Or ($Index + $i < 0) Or ($Index + $i >= _GUICtrlListViewGetItemCount($Listview) ) Then Return
    _GUICtrlListViewDeleteItem($Listview, $Index)
    _GUICtrlListViewInsertItem($Listview, $Index + $i, $SelText)
    ControlListView($Gui, "", $Listview, "Select", $Index + $i, $Index + $i)
endfunc