scrollable.scala

JAVA 语言的函数式编程扩展

package scala.swing

import java.awt.Rectangle

/**
 * @see javax.swing.Scrollable
 */
trait Scrollable extends Component {
  protected def scrollablePeer: javax.swing.Scrollable
  def preferredViewportSize = scrollablePeer.getPreferredScrollableViewportSize
  
  def tracksViewportHeight: Boolean = scrollablePeer.getScrollableTracksViewportHeight
  def tracksViewportWidth: Boolean = scrollablePeer.getScrollableTracksViewportWidth
  
  def blockIncrement(visibleRect: Rectangle, orientation: Orientation.Value, direction: Int): Int =
    scrollablePeer.getScrollableBlockIncrement(visibleRect, orientation.id, direction)
  
  def unitIncrement(visibleRect: Rectangle, orientation: Orientation.Value, direction: Int): Int =
    scrollablePeer.getScrollableUnitIncrement(visibleRect, orientation.id, direction)
}