Thank you! Exactly what I was looking for. On 3/19/2018 2:49 PM, J. Landman Gay via use-livecode wrote: > On 3/19/18 11:15 AM, Paul Dupuis via use-livecode wrote: >> Does anyone have any code for supporting scrolling fields by use of a >> mouse wheel that they would care to post or email me? > > From my cribbed collection: > > on rawKeyDown pKeyNumber > if pKeyNumber is 65308 then put 15 into tScrollInc -- > increaseScroll, scroll wheel down > else if pKeyNumber is 65309 then put -15 into tScrollInc -- > decreaseScroll, scroll wheel up > if tScrollInc is empty then pass rawKeyDown > set the vScroll of me to (the vScroll of me + tScrollInc) > end rawKeyDown > > -- both vertical and horizontal: > > on rawKeyDown pKey > switch pKey > case 65309 > set the vScroll of me to the vScroll of me - 30 > break > case 65308 > set the vScroll of me to the vScroll of me + 30 > break > case 65311 > set the hScroll of me to the hScroll of me - 30 > break > case 65310 > set the hScroll of me to the hScroll of me +30 > break > default > pass rawKeyDown > end switch > end rawKeyDown
_______________________________________________ use-livecode mailing list use-livecode@lists.runrev.com Please visit this url to subscribe, unsubscribe and manage your subscription preferences: http://lists.runrev.com/mailman/listinfo/use-livecode
