Retro video games delivered to your door every month!
Click above to get retro games delivered to your door ever month!
X-Hacker.org- Mouse interface routines - <b>brmousefunc()</b> http://www.X-Hacker.org [<<Previous Entry] [^^Up^^] [Next Entry>>] [Menu] [About The Guide]
 BRMOUSEFUNC()
 Process mouse events within the given browse
------------------------------------------------------------------------------
 Syntax
      BRMouseFunc( <oBrowse>, <nButton>, <nRow>, <nCol>, <nTime>) -> <lMore>
 Arguments
     <oBrowse> - The browse to process
     <nButton> - Button which was hit 1=Left, 2=Right, 4=Center
     <nRow>    - Row coordinate of mouse pointer when button hit in screen
                 row/col coordinates
     <nCol>    - Col coordinate of mouse pointer
     <nTime>   - The system time that the button was clicked

 Returns
     <lMore> which signifies if the browse is to continue. It will only be
             .F. if operating under a while condition and the last record
             is no longer valid because the user modified a field which
             is part of the while key.
 Description
     This routine processes mouse events. First hot spots are checked then
     a check for movement or activation of an edit within the browse is made.
 Examples
     FT_MSHOWCRS()

     nKey=0
     nMouseKey=0
     DO WHILE (nKey=0).AND.(nMouseKey=0)
        nMousekey=FT_MGETPOS(@nMouseRow,@nMouseCol)
        nKey=INKEY()
     ENDDO

 if we have input from the mouse then convert the mouse coordinates
 Get time so we can time a double click if necessary

     IF  nMouseKey>0
        nTime=SECOND()
     ENDIF

     FT_MHIDECRS()

    IF nMouseKey>0
       BRMouseFunc(oBrowse,nMouseKey,INT(nMouseRow/8),INT(nMouseCol/8),nTime)
    ENDIF


 Source: MOUSBROW.PRG

 Author: Leo Letendre

See Also: MBrowse() BuildBrowse() BRHotSpot()

Online resources provided by: http://www.X-Hacker.org --- NG 2 HTML conversion by Dave Pearson