Phil, Am I supposed to initiate words tx and ls first? Here I got an error Carlos
Em Qua 10 Dez 2003 01:07, [EMAIL PROTECTED] escreveu: > Hi Bruno/Carlos, > > Here is another text-area scroll demo .... > > rebol [ > Title: "Area with scroller" > Author: "Phhil Bevan" > Date: 10-Dec-2003 > Version 0.0.1 > ] > > pos-scroll: func [tx sl /local tsize ts-max tmp] [ > tsize: size-text tx > either tsize/y <= tx/size/y > [sl/redrag 1 sl/data: 0] > [ > sl/redrag tx/size/y / tsize/y > ts-max: tsize/y - tx/size/y > tmp: min 1 (- tx/para/scroll/y / ts-max) > if all [sl/data = 1 tmp = 1] [tmp: 0.999] > sl/data: tmp > ] > show sl > ] > > lv-lay: layout [ > space 0 > across > tx: area 400x200 feel [ > engage: func [face action event] [ > ctx-text/edit/engage face action event > if all [event/type = 'key] [pos-scroll tx sl] > ] > ] > sl: scroller 16x200 [scroll-para tx sl] > ] > > pos-scroll tx sl ; set original size > view lv-lay > > ---------------------------------- > > Cheers Phil > > > === Original Message === > > > > > > Bruno, > > > > I remember last time I asked here just the same > > and unfortunately I got only one reply from the list > > that didn't solve the problem at all. > > > > I still need to get the path to get this this "auto-move" > > you mentioned so in case you have a clue write me pls > > > > um abraço > > Carlos Lorenz > > > > Em Seg 08 Dez 2003 18:30, Bruno G. Albuquerque escreveu: > > > Hello. > > > > > > By know I learned how to use scroll bars in text areas to scroll the > > > text inside it (vertically and horizontally). Now I need the scroll > > > bars to auto-move to represent the current position being displayed in > > > the text view when I use the cursor keys to move around the text. I > > > also need to know how to scroll the text area to a specific text > > > position (like scroll to top and scroll to bottom). > > > > > > Any help will be apreciated. > > > > > > -Bruno > > > > -- > > To unsubscribe from this list, just send an email to > > [EMAIL PROTECTED] with unsubscribe as the subject. -- To unsubscribe from this list, just send an email to [EMAIL PROTECTED] with unsubscribe as the subject.
