Click above to get retro games delivered to your door ever month!

 pickisskip()        Return the skip mode of a list
------------------------------------------------------------------------------
 Declaration
   pick.hdr

 Syntax
   func logical pickisskip extern
   param value _SLIST pList

 Arguments
   pList is a list pointer.

 Return
   A logical indicating the skip mode for the list.

 Description
   The pickisskip() function returns the currently defined skip mode
   for list display. By default skip mode is turned on, i. e. when
   executing the pickdisp() function, the selection bar skips over
   non-active items when the user moves the bar.

   This function is normally used with string lists to be displayed via the
   pickdisp() function.

 Example
   #define EXAMPLE_LIST
   #include example.hdr

   proc Test_pickisskip
   vardef
      _SLIST pList
   enddef
   pList := pickinit()
   
   pickadd( pList, "One" )
   pickadd( pList, "Two" )
   pickadd( pList, "Three" )
   pickadd( pList, "Four" )
   pickadd( pList, "Five" )
   
   ? pickisskip( pList )          // display current skip setting (.t.)
   picksetskip( pList, .f. )      // clear the skip flag for the list
   ? pickisskip( pList )          // display current skip setting (.f.)
   
   pickclear( pList )
   endproc

   proc main
   Test_pickisskip()
   endproc