Alain Wrobel wrote:
> (FB^3 Release 7 fr)
> 
>         Hello,
> 
>         I have a probleme with Pictures in Appearance Runtime :
> 
>     I can't draw a Picture in another position than the creation 
> position when there is a scroll button un the window.
> 
>     All is ok without scroll button or in Standard Runtime.
> 
>     Where is my mistake ?
> 

There might be a problem with the clipping region when a scroll bar is 
added. I admit I don't know why. The following shows a work around:

#if ndef _appearanceRuntime
compile shutdown "Ce programme doit être compilé avec le Runtime 
Appearance."
#endif

local fn faitPict
dim rctPict.8;0,t,l,b,r
dim rFen as rect
dim@ ImageHndl&

setrect(rctPict,50,50,150,150)

SetRect(rFen,0,0,window(_width),window(_height))
ClipRect(rFen)

color _zGreen
picture on(l,t)-(r,b)
paintrect(rctPict)
picture off,ImageHndl&
color _zBlack
picture,ImageHndl&
picture(0,0),ImageHndl&
picture(200,50),ImageHndl&
kill picture ImageHndl&
locate 15,15:print "clic pour continuer"
do
until fn button
end fn

dim rectFen as rect

setrect(rectFen,40,600,400,800)
WINDOW 1,"no scroll  button ---> 3 images",@rectFen,_docZoom_updateVisRgn
fn faitPict
delay 1000
cls
window close 1

WINDOW 1,"scroll button --> 1 image 
!!!!!!!!!!",@rectFen,_docZoom_updateVisRgn
SCROLL BUTTON 1,,,,,,_scrollVert

fn faitPict
end

-- 
Cheers,

A. Pastor