Re: [perl-win32-gui-users] SelectedItems method

[Erick J. B. <er...@e-...>]

Aldo, I had a look at the GUI.XS (Version: 0.0.558) and I
found the following lines (at line: 9930~) for SelectedItems
return:

scount = ListView_GetSelectedCount(handle);
if(scount > 0) {
    index = -1;
    tcount = 0;
    EXTEND(SP, scount);
    index = ListView_GetNextItem(handle, index,
LVNI_SELECTED);
    while(tcount < scount && index != -1) {
        XST_mIV(tcount, (long) index);
        tcount++;
        index = ListView_GetNextItem(handle, index,
LVNI_SELECTED);
    }
    XSRETURN(scount);
} else {
    XSRETURN_NO; #Is the problem here?#
}

erick
never stop questioning
www.jeb.ca