[futurebasic] Re: darkening the screen

Message: < previous - next > : Reply : Subscribe : Cleanse
Home   : April 1998 : Group Archive : Group : All Groups

From: "Pierre A. Zippi" <pzippi@...>
Date: Tue, 28 Apr 1998 13:20:04 -0500
Forrest Blanton wrote:
> 
> Is there a way to darken a PICTURE FIELD when you move your mouse over it?
> If that's not possible, perhaps just any help on how you would darken a
> portion of  the screen would be appreciated.


Here's a minor modification of the previous to show the effect with the mouse 
position.

WINDOW 1
'--------------------------
LONG COLOR 65000,0,0
BOX FILL 10,10 TO 200,100
LONG COLOR 0,65000,0
BOX FILL 10,100 TO 200,200
LONG COLOR 0,0,0
PEN 2,2,1,10,0
BOX 15,15 TO 195,195
DO
'this could be in your dialog handler with cursor events
LONG IF MOUSE(_horz)>10 AND MOUSE(_horz)<200 AND MOUSE(_vert)>10 AND MOUSE(_vert)<200
  IF new%=1 THEN BOX 15,15 TO 195,195:new%=0
XELSE
  IF new%=0 THEN BOX 15,15 TO 195,195:new%=1 
END IF
UNTIL FN BUTTON

-- 
Pierre A. Zippi
------------------
Home email: paz@...
Home web: http://web2.airmail.net/paz