Thanks for the idea Robert,

Unfortunately, to my shame, I left out a crucial piece of info. The two
nested rectangles together serve as a frame for a set of buttons. So,
painting the inner rectangle white covers up the buttons.

I've never used UnionRect nor SectRect nor regions. I was hoping I
would be able to use Frank T's Learning FutureBasic: Toolbox to learn
how to use them, but am having a problem downloading the files.

Bruce Gottshall

Thu Sep 2 19:57:41 2004 Robert Covington wrote:

>This do the trick?   You could do some UnionRect and SectRect and region 
>approaches as well...but this is easy enough.
>
>CLEAR LOCAL
>DIM r as rect
>'~'<
>LOCAL FN RefreshMain
>FLUSHWINDOWBUFFER
>
>PEN 2,2,1,8,0
>SETRECT(r,72,136,504,288)
>'~';
>long color 32767,32767,32767
>paintroundRect(r,9,9)
>'~';
>COLOR _zblue
>FRAMEROUNDRECT(r,9,9)
>INSETRECT(r,100,8)
>'~';
>color _zwhite
>paintroundRect(r,9,9)
'~';
>COLOR _zred
>FRAMEROUNDRECT(r,9,9)
>PENNORMAL
>COLOR _zblack
>FLUSHWINDOWBUFFER
>END FN
>
>window 1
>FN RefreshMain
>do
>handleEvents
>until 0
>r
>c


>On Thursday, September 2, 2004, at 04:50   PM, BrucesFB3@... wrote:
>
>> Hello Everyone,
>>
>> The code snipet below creates 2 nested rectangles. What I
>> would like to know is what is the most efficient way to fill
>> in the space between the inner and outer rectangle with a
>> third color, using LONG COLOR.
>>
>> Bruce Gottshall
>>
>> CLEAR LOCAL
>> DIM r as rect
>> '~'<
>> LOCAL FN RefreshMain
>> FLUSHWINDOWBUFFER
>> COLOR _zblue
>> PEN 2,2,1,8,0
>> SETRECT(r,72,136,504,288)
>> FRAMEROUNDRECT(r,9,9)
>> COLOR _zred
>> INSETRECT(r,100,8)
>> FRAMEROUNDRECT(r,9,9)
>> PENNORMAL
>> COLOR _zblack
>> FLUSHWINDOWBUFFER
>> END FN

--
To unsubscribe, send ANY message to: futurebasic-unsubscribe@...