XYplorer Beta Club

admin wrote:The current implementation is: when the end of the list is reached the last item is unselected, but the focus stays on it (focus must be on any item if there are items).

focus;
sel 1;
while(Compare("<curitem>", "<focitem>") == 0) {
     sel +1;
}

TheQwerty wrote:It looks like you want to do something for every item currently visible, so an alternative is to use Report() or GetInfo(), and then GetToken() with a while loop that breaks when the token is empty.

TheQwerty wrote:

admin wrote:The current implementation is: when the end of the list is reached the last item is unselected, but the focus stays on it (focus must be on any item if there are items).

Which means you could do:

Code: Select all

focus;
sel 1;
while(Compare("<curitem>", "<focitem>") == 0) {
     sel +1;
}

It looks like you want to do something for every item currently visible, so an alternative is to use Report() or GetInfo(), and then GetToken() with a while loop that breaks when the token is empty.

admin wrote:BTW, CountToken() is on my list and will come soon...

$path = "<curpath>"; 
     $parent = regexreplace($path, '^.+\\([^\\]+)$', '$1');
   //$grandparent = gettoken($path, -2, "\");
 msg $parent;

Stefan wrote:

admin wrote:BTW, CountToken() is on my list and will come soon...

Bump

Found this thread while searching for GetToken() with negative index
which would start the search from the end.

gettoken(string, [index=1], [delimiter=" "])
If index is negative, the returned token will be the part from the index'th token from the right till end of string.

Code: Select all

$path = "<curpath>"; 
     $parent = regexreplace($path, '^.+\\([^\\]+)$', '$1');
   //$grandparent = gettoken($path, -2, "\");
 msg $parent;