[<<Previous Entry]
[^^Up^^]
[Next Entry>>]
[Menu]
[About The Guide]
FUNCTION MBRZMOVE() *new*
Short:
------
MBRZMOVE() Checks for mouse click at and moves to Tbrowse row/col
Returns:
--------
<lClicked> => If the mouse clicked on a new Tbrowse Row/Column.
Syntax:
-------
MBRZMOVE(oTBrowse, nMouseRow, nMouseCol,[nTop,nLeft,nBottom,nRight])
Description:
------------
Determines if the mouse coordinates <nMouseRow> and <nMouseCol>
are on a new Tbrowse row/column, and causes the Tbrowse cursor to
move there.
[nTop,nLeft,nBottom,nRight] determine the Tbrowse 'live' area - the
area exclusive of headers, footers, seperators etc. MBRZMOVE() can
determine this on its own, but it is much faster to pass these
coordinates if you can.
Examples:
---------
from MCHOICE():
case nLastKey == K_MOUSELEFT
do case
case ISMOUSEAT(nMouseR, nMouseC, nBottom,nRight-3, nBottom, nRight-2)
oTb:down()
IFMOUSEHD({||oTb:down()},oTb)
case MBRZMOVE(oTb,nMouseR, nMouseC,nTop+1,nLeft+1,nBottom-1,nRight-1)
keyboard chr(K_ENTER)
case MBRZMOVE(oTb,nMouseR, nMouseC)
EXIT
endcase
endcase
Source:
-------
S_MOOSE.PRG
This page created by ng2html v1.05, the Norton guide to HTML conversion utility.
Written by Dave Pearson