[futurebasic] Re: White border around picture

Message: < previous - next > : Reply : Subscribe : Cleanse
Home   : January 2000 : Group Archive : Group : All Groups

From: Richard Goodman <bhomme@...>
Date: Mon, 10 Jan 2000 10:02:34 -0700
>
>Richard Goodman wrote:-----------------------------
>
>> I have the same problem as Martin: an unwanted white border around around a
>> picture.
>>
>> I have tried to adapt Osamu's code snippet to FB^3 but I can't quite make
>> it work.
>>
>> Here is my code:
>>
>> LOCAL
>> DIM myrect.8                            'Rectangle to hold PICT position
>> DIM pict&
>> LOCAL FN Opentitle
>>   pict& = FN GETRESOURCE(_"PICT",128)
>>   LONG IF pict& <> 0                   ' Is the handle valid?
>>      myrect.top%;8 = @pict&..picFrame.top%
>>      CALL OFFSETRECT (myrect,-myrect.left%,-myrect.top%)
>>      REM           WINDOW 10,, (0,0)-(553,365), -_Dialogframe
>>      WINDOW 10,, myrect, -_Dialogframe
>>      PICTURE (0,0),pict&
>>   END IF                               'valid handle
>>   DO                                   'Opening screen stays until user
>> does something.
>>   UNTIL FN BUTTON OR LEN(INKEY$)
>>   WINDOW CLOSE 10
>> END FN
>>
>> The WINDOW statement results in several errors. Apparently FB^3 is not
>> recognizing "myrect" as a rectangle in the WINDOW statement. On the other
>> hand, the commented WINDOW statement above it, works fine, displaying the
>> picture in a window, but with the white border. This shows that the rest of
>> Osamu's code is sound. I would appreciate help on getting this code (or an
>> alternate algorithm) to work to display a picture in a window without the
>> white border.
>>
>> Richard
>>
>> Richard,

Date: Wed, 05 Jan 2000 15:46:15 +0000
From: Ian Mann <i.mann@...>
Reply-To: i.mann@...
try changing the myrect in the Window statement to @myrect

>Ian

Thanks, Ian. I'll try that.

Richard

Date: Thu, 6 Jan 2000 11:59:32 +1000
To: futurebasic@...
From: David Cottrell <David.Cottrell@...


>For a start: try DIM myRect as Rect
>
>Are you using the correct runtime (ie FB II).
>
>Cheers
>
>David

Thanks, David. Yes, I am using FB II emulation. I'll try your DIM
suggestion. I admit to confusion about the new ways rect records are dealt
with.

Al Staffieri wrote:

<<<You're getting a white border around the PICT because you're using a window
with a border (_DialogFrame). The problem can be solved by using either _Dialo
gPlain, DialogShadow, or _DocNoGrow.

WINDOW 10,, @myrect, -_DialogPlain>>>

Al Staffieri Jr.

Wow! Three answers to my question. I'll try them all.

However, because it is a splash screen, I don't want a title bar. I think
some of the windows you sugges may work out.

Richard