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

 pickmarkpos()       Return the current marker position of a list
------------------------------------------------------------------------------
 Declaration
   pick.hdr

 Syntax
   func logical pickmarkpos extern
   param value _LIST pList

 Arguments
   pList is a list pointer.

 Return
   A logical indicating if the list marker character is displayed to the
   left of a list item.

 Description
   The pickmarkpos() function returns the currently defined position for
   list display marker characters (.t. = leftmost column, .f. == rightmost
   column). By default, the pickdisp() function positions marker
   characters in the rightmost column of the display area.

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

 Example
   #define EXAMPLE_LIST
   #include example.hdr

   proc Test_pickmarkpos
   vardef
      _SLIST pList
   enddef
   pList := pickinit()
   ? pickmarkpos( pList )         // prints .f.
   picksetmarkpos( pList, .t. )   // set mark position to the left side
   ? pickmarkpos( pList )         // prints .t.
   pickclear( pList )
   endproc

   proc main
   Test_pickmarkpos()
   endproc