Hi Koen
in the scrolling container properties there is hScrollSmallChange,vScrollSmallChane,Scrollby(x,y)...
there is 3 pageframes with SBC scrolling container in each one.
Add 2 buttons "up" and "down" to the example form given by Alex...frmsbcsample.scx
and bind with these codes:
1*up button
do case
case thisform.pageframe1.activePage=1
thisform.pageframe1.page1.SBC.hScrollSmallChange=1
thisform.pageframe1.page1.SBC.vScrollSmallChange=1
for i=1 to 10
thisform.pageframe1.page1.sbc.scrollby(20,0)
inkey(0.2)
endfor
case thisform.pageframe1.activePage=2
thisform.pageframe1.page2.SBC.hScrollSmallChange=1
thisform.pageframe1.page2.SBC.vScrollSmallChange=1
for i=1 to 10
thisform.pageframe1.page2.sbc.scrollby(0,-20)
inkey(0.2)
endfor
case thisform.pageframe1.activePage=3
thisform.pageframe1.page3.SBC.hScrollSmallChange=1
thisform.pageframe1.page3.SBC.vScrollSmallChange=1
for i=1 to 10
thisform.pageframe1.page3.sbc.scrollby(0,20)
inkey(0.1)
endfor
for i=1 to 10
thisform.pageframe1.page3.sbc.scrollby(20,0)
inkey(0.2)
endfor
endcase
2*down button
do case
case thisform.pageframe1.activePage=1
thisform.pageframe1.page1.SBC.hScrollSmallChange=1
thisform.pageframe1.page1.SBC.vScrollSmallChange=1
for i=1 to 10
thisform.pageframe1.page1.sbc.scrollby(-20,0)
inkey(0.1)
endfor
case thisform.pageframe1.activePage=2
thisform.pageframe1.page2.SBC.hScrollSmallChange=1
thisform.pageframe1.page2.SBC.vScrollSmallChange=1
for i=1 to 10
thisform.pageframe1.page2.sbc.scrollby(0,20)
inkey(0.2)
endfor
case thisform.pageframe1.activePage=3
thisform.pageframe1.page3.SBC.hScrollSmallChange=1
thisform.pageframe1.page3.SBC.vScrollSmallChange=1
for i=1 to 10
thisform.pageframe1.page3.sbc.scrollby(0,-20)
inke(0.1)
endfor
for i=1 to 10
thisform.pageframe1.page3.sbc.scrollby(-20,0)
inke(0.1)
endfor
endcase
*can adapt the scrollBy (x,y) values to your taste.
*can replace inkey() with sleep api (its better precision)
Regards