Retro video games delivered to your door every month!
Click above to get retro games delivered to your door ever month!
X-Hacker.org- TSDWIN: Clipper 5.0 Interface Library - Norton Guide http://www.X-Hacker.org [<<Previous Entry] [^^Up^^] [Next Entry>>] [Menu] [About The Guide]

 twAMFound()
 ----------------------------------------------------------------------------
     See if the mouse cursor is within one of an array of regions
     defined with twMSetRegions().

       Arguments:

     None. The region information comes from the static array held
     within TSDWIN.

       Return:

     Region number or zero.

       Example:

     DO WHILE INKEY() != K_ESC
        IF _twM5A( 1 ) = 2
                _twM2()
                KEYBOARD CHR( 27 )
        ENDIF

        IF ( nRegion := twAMFound()) > 0 .AND. ;
                ( nRegion != nLRegion )
                _twM2()
                twCenter( 11, "Mouse  IS IN Region" )

                tw_VAttr( aRegions[ nRegion, 1 ], ;
                        aRegions[ nRegion, 2 ], ;
                        aRegions[ nRegion, 3 ], ;
                        aRegions[ nRegion, 4 ] , nEnhClr )

                tw_VAttr( aRegions[ nLRegion, 1 ], ;
                        aRegions[ nLRegion, 2 ], ;
                        aRegions[ nLRegion, 3 ], ;
                        aRegions[ nLRegion, 4 ] , nStdClr )

                nLRegion := nRegion
                nRegion  := 0
                _twM1()
        ELSE
                twCenter( 11, "Mouse NOT IN Region" )
        ENDIF
     ENDDO

See Also: twMFound()

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