Scroller.st
changeset 2358 eadde3a9c586
parent 2351 26bcce60314c
child 2383 5783b2c07e85
equal deleted inserted replaced
2357:527d93ed293a 2358:eadde3a9c586
  2453     self thumbOrigin:percent
  2453     self thumbOrigin:percent
  2454 ! !
  2454 ! !
  2455 
  2455 
  2456 !Scroller methodsFor:'queries'!
  2456 !Scroller methodsFor:'queries'!
  2457 
  2457 
       
  2458 isScrolling
       
  2459     "true, if thumb is being moved (by user)"
       
  2460 
       
  2461     ^ scrolling
       
  2462 !
       
  2463 
  2458 preferredExtent
  2464 preferredExtent
  2459     "return my preferredExtent"
  2465     "return my preferredExtent"
  2460 
  2466 
  2461     |defExt w h|
  2467     |defExt w h|
  2462 
  2468 
  2509 ! !
  2515 ! !
  2510 
  2516 
  2511 !Scroller class methodsFor:'documentation'!
  2517 !Scroller class methodsFor:'documentation'!
  2512 
  2518 
  2513 version
  2519 version
  2514     ^ '$Header: /cvs/stx/stx/libwidg/Scroller.st,v 1.154 2001-04-04 08:18:01 cg Exp $'
  2520     ^ '$Header: /cvs/stx/stx/libwidg/Scroller.st,v 1.155 2001-04-30 12:39:08 cg Exp $'
  2515 ! !
  2521 ! !