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

  WPOS()                                                     Window Function
 Purpose..: Move the cursor to a window position
-------------------------------------------------------------------------------
 Syntax...: wPos( [<uWin>] [, <nRow> [, <nCol>]] ) --> NIL

 Arguments: [<uWin>] = the string identifier of the window
                       OR the reference to the window structure
                       returned as an array by wNew() or wArray().
                       If not passed, the function will operate on
                       the window in focus.

            [<nRow>] = the window row to display the value in wOut().
                       The default is to row 0. The function goes
                       hand in hand with wOut().

            [<nCol>] = the window column to display the value
                       in wOut(). The default is to column 0.

 Returns..: NIL

 Remark...: It is the FreshWin equivalent of the Clipper
            function SetPos().

 Source...: WPOS.PRG
-------------------------------------------------------------------------------
 Example..: . The example uses wPos() in conjunction with wOut()
              to display the messages on the screen.

    wOpen( "BackDrop" )

    for n = 1 to wLength( "BackDrop" ) step 4

        wPos( ,n  , 0 )
        wOut( ,replicate( "FreshWin     .    ", int( ( wWidth()+1 )/10 ) ) )

        wPos( ,n+2, 0 )
        wOut( ,replicate( "    .    FreshWin ", int( ( wWidth()+1 )/10 ) ) )

    next