slide with multiples of x?

[Jim Ault]

Same result, just a little bit shorter and one less handler, but probably
the same speed.

> on mouseUp
   get the thumbposition of me
   set the thumbposition of me to ((it div 20)+( it mod 20 div 10))*20
>    AdjustLabelPosition
> end mouseUp

You can do a quick test by pasting the following lines in the multi-line
message box and hitting the enter key

put empty into msg
repeat with x = 1 to 109
get ((x div 20)+( x mod 20 div 10))*20
put msg &cr & x && it into msg
end repeat

and now your msg box is filled with 110 lines of results

If you don't like the hard coded numbers try something like
put 100/5 into incrm
put ((it div incrm)+( it mod incrm div (incrm/2)))*incrm

> I implemented my own scrollbar value indicator that I move.    Here's what
> I wound up with in my script.  I haven't tried this on the Mac yet.  I
> don't like the hard-coded numbers; the might not work on the Mac.
It runs on a Mac just fine.

Jim Ault
Las Vegas

On 12/5/06 1:35 PM, "Peter T. Evensen" <pevensen at siboneylg.com> wrote:

> Hi Eric,
> 
> Thanks for the pointer.  The one key I was missing is scrollbarDrag.  I
> didn't know about that message.
> 
> I implemented my own scrollbar value indicator that I move.    Here's what
> I wound up with in my script.  I haven't tried this on the Mac yet.  I
> don't like the hard-coded numbers; the might not work on the Mac.  I'll
> have to think to see if I can come up with anything better.
> 
> on mouseUp
>    set the thumbposition of me to NearestThumbPos(the thumbposition of me)
>    AdjustLabelPosition
> end mouseUp
> 
> on scrollbarDrag
>    lock screen
>    AdjustLabelPosition
>    unlock screen
> end scrollbarDrag
> 
> function NearestThumbPos pPos
>    put pPos div 20 into tNumTwenties
>    put pPos mod 20 into tRemainder
>    if tRemainder >= 10 then
>      add 1 to tNumTwenties
>    end if
>    return 20 * tNumTwenties
> end NearestThumbPos
> 
> on AdjustLabelPosition
>    put the thumbposition of me into tPos
>    put NearestThumbPos(the thumbposition of me) into field "Thumb Pos"
>    put (the width of me - 12) / the endValue of me into tPixelsPerValue
>    put the left of me + 6 + tPixelsPerValue * tPos into tThumbLoc
>    put the loc of field "Thumb Pos" into tFieldLoc
>    put tThumbLoc into item 1 of tFieldLoc
>    set the loc of field "Thumb Pos" to tFieldLoc
> end AdjustLabelPosition
> 
> 
> At 02:46 PM 12/5/2006, you wrote:
>> Hi Peter,
>> 
>> The "How to Manage "Snap to" Scrollbars" tutorial might help you:
>> How to manage a slider snap-to behavior to make sure that the
>> indicator lines up with the ticks especially on Mac OS X.
>> You will access this tutorial through "Tutorials Picker" a free
>> plugin that interfaces with the So Smart Software website in order to
>> display all available tutorials stacks directly from the web.
>> You will find it by going to http://www.sosmartsoftware.com/.
>> Revolution/Plugins or Tutorials section.
>> 
>> Le 5 déc. 06 à 21:43, Peter T. Evensen a écrit :
>> 
>>> Is there a built-in way to create a slider that only stops at
>>> increments of x (e.g., of 20, from 0 to 100, so 0, 20, 40, 60, 80,
>>> 100)?
>>> 
>>> Thanks!
>> 
>> 
>> Best Regards from Paris,
>> Eric Chatonet
>> ------------------------------------------------------------------------
>> ----------------------
>> http://www.sosmartsoftware.com/    eric.chatonet at sosmartsoftware.com/
>> 
>> 
>> _______________________________________________
>> use-revolution mailing list
>> use-revolution at lists.runrev.com
>> Please visit this url to subscribe, unsubscribe and manage your
>> subscription preferences:
>> http://lists.runrev.com/mailman/listinfo/use-revolution
> 
> Peter T. Evensen
> http://www.PetersRoadToHealth.com
> 314-629-5248 or 888-682-4588
> _______________________________________________
> use-revolution mailing list
> use-revolution at lists.runrev.com
> Please visit this url to subscribe, unsubscribe and manage your subscription
> preferences:
> http://lists.runrev.com/mailman/listinfo/use-revolution