Mailing List Archive: 49091 messages
  • Home
  • Script library
  • AltME Archive
  • Mailing list
  • Articles Index
  • Site search

[REBOL] Re: horizontal scroll?

From: hijim:pronet at: 2-Aug-2001 19:59

I changed the scroll-to function to scroll-to: func [txt /local xy] [ xy: (caret-to-offset text-file txt) - text-file/para/scroll text-file/para/scroll: min 0x0 text-file/size / 1.05 - xy my-slider/data: (second xy) / max 1 second size-text text-file ] 1.05 instead of 2 eliminates the horizontal scrolling, but it puts the found text on the bottom line of the display instead of in the center. If there's a simple way of scrolling the text up 2 or 3 lines, I'd like to know it. I'm still experimenting, so I may find the answer. Jim