[EMAIL PROTECTED] wrote:

> Hi!
>
> I just finished two new styles for VID. The first one is a
> scroller, which is a generalization of the "slider" style found in
> VID. The second one is a replacement for VID's slider.
>
> The SLIDER style is almost backward compatible with VID's slider;
> only a minor change to your layouts should be needed if you add these
> styles to them: the current value of the slider is SLIDER/CURRENT
> instead of SLIDER/DATA.
>     Its behaviour is different from that of VID's slider,
> hopefully better; the look is the same anyway.
>     This style offers more functionality wrt VID's. It is possible
> to set the minimum as well as the maximum value for the slider.
> Examples:
>
> ...
> do %scroller-styles.r
> ...
> view layout [
>     styles scrollers
>     ...
>     slider ; as for VID's (from 1 to size)
>     slider 310 ; range from 1 to 310
>     slider minimum 5 maximum 20 ; range from 5 to 20
>     ...
> ]
> ...
>
> (SLIDER is implemented as a special case of SCROLLER, so it has
> all of its features; the difference between the two is only in
> default values.)
>
> The SCROLLER style is very similar to the one found in my previous
> script CID-Utils.r. It is designed to be used to scroll areas.
> Other than the obvious minimum and maximum value parameters, it
> has a VISIBLE parameter that is used to specify how much of the
> area is visible.
>     So, VISIBLE is the size of the visible area; MINIMUM is the
> value the scroller should have when the top of the area is
> visible; MAXIMUM is the value the scroller should have when the
> bottom of the area is visible.
>     By default, the scroller comes with two arrows. It is possible
> to choose their position; by default they are as I like them, on
> both sides of the scroller. (I know some of you DON'T like them
> this way, but I repeat that this is just the default.) Pressing an
> arrow will increase/decrease the scroller's value by 5 (this can
> be changed too).
>     Some examples:
>
> ...
> do %scroller-styles.r
> ...
> view layout [
>     styles scrollers
>     ...
>     scroller ; just a vertical scroller with arrows, going from 0
>              ; to 150, visible 50
>     scroller minimum 10 maximum 100 visible 30 ; you can guess
>     scroller options [without arrows] ; no arrows
>     scroller options [with arrows together] ; both arrows on the
>                                             ; same side
>     scroller options [with arrows skipping 10]
>                     ; pressing an arrow will skip 10
>     ...
> ]
> ...
>
> For those of you who like having the arrows together, I'd suggest
> defining your own style:
>
>     ...
>     styles scrollers
>     style my-scroller scroller options [with arrows together]
>     ...
>     my-scroller ...
>     ...
>
> Ok, enough for now. I hope to put up a REB site soon with
> documentation ad examples.
>

Hey, Gabriele, cool. Use 'across at the beginnig of your examples please, as all that
variants of scrollers don't fit 800x600 resolution.

One note to RT - I haven't seen anything so ugly as an arrow effect is, bleah :-)))) It
completly doesn't fit /View design. Just look at nice Carl's image-sort.r script, and I
can't image arrows placed anywhere on screen. At least some beveled drawing should be 
used
instead of flat one for arrow effect, please :-)

Gabriele, would it be possible to get scroller which will react upon mouse relese, so 
not
in real-time? I saw it implemented in some apps, and it could help us on slower 
systems -
so drag the scroller, release the mouse button, do the event ...

Thanks,

-pekr-

>
> See ya,
>     Gabriele.
> --
> Gabriele Santilli <[EMAIL PROTECTED]> - Amigan - REBOL programmer
> Amiga Group Italia sez. L'Aquila -- http://www.amyresource.it/AGI/
>
>   ------------------------------------------------------------------------
>                            Name: scroller-styles.r
>    scroller-styles.r       Type: Plain Text (text/plain)
>                        Encoding: quoted-printable
>                     Description: created 13.06.2000 19:03:36, last accessed 
>13.06.2000

Reply via email to