slide with multiples of x?

John Craig jc at spl21.net
Wed Dec 6 03:10:41 CST 2006


Here's another similar wee snippet.

on mouseUp
  set the thumbPos of me to round(the thumbPos of me / 20) * 20
end mouseUp

:-)

Jim Ault wrote:
> 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
>>     
>
>
> _______________________________________________
> 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
>
>   





More information about the use-livecode mailing list