Hi Anton,

Thanks for your reply. I tried scroll-face in the same way without any 
results. I thought I was doing something wrong.
But now I know we just have to wait. Thanks for testing it more thoroughly.

Tim

Anton Rolls wrote:

>Hello Tim,
>
>Thanks for drawing my attention to those two new functions. :)
>I found scroll-drag to be pretty easy to figure out:
>
>       view layout [
>               scr: scroller
>               btn "down" [scroll-drag/page scr]
>               btn "up" [scroll-drag/back/page scr]
>       ]
>
>Scroll-face, on the other hand, looks like it will be a handy
>function, when the access functions for each of the default
>VID styles are implemented.
>
>We might expect the AREA style to have such an access function
>defined, but as we can see, it does not:
>
>       >> probe svv/vid-styles/area/access
>       make object! [
>           set-face*: func [face value][
>               if face/para [face/para/scroll: 0x0]
>               face/text: form value
>               face/line-list: none
>           ]
>           get-face*: func [...
>           ...
>
>(did not see "scroll-face*" in there.)
>
>Mmm... Let's check every default VID style to see if there are
>any examples at all:
>
>       str: "" foreach [style obj] svv/vid-styles [append str remold [style
>obj/access]]
>       find str "scroll-face*"
>       ;== none
>
>None. Bugger. Hasn't been done yet.
>
>Anton.
>
>  
>
>>Hi List,
>>
>>Could someone give me a simple example of the two new functions:
>>
>>*scroll-drag
>>*and*
>>**scroll-face*
>>*
>>*What I understand is that these functions should make it a lot easer to
>>use scrolling in view 1.3, but how?
>>
>>Thanks, Tim
>>    
>>
>
>  
>

-- 
To unsubscribe from the list, just send an email to 
lists at rebol.com with unsubscribe as the subject.

Reply via email to