ListView.st
changeset 311 cddf10b2207e
parent 305 4aab887bf2ff
child 332 284baf841664
equal deleted inserted replaced
310:4bbc8deffc8c 311:cddf10b2207e
  1550 
  1550 
  1551 firstLineShown
  1551 firstLineShown
  1552     "return the index of the first (possibly partial) visible line"
  1552     "return the index of the first (possibly partial) visible line"
  1553 
  1553 
  1554     ^ firstLineShown
  1554     ^ firstLineShown
       
  1555 !
       
  1556 
       
  1557 heightForLines:numberOfLines
       
  1558     "return the height of the receiver, if numberOfLines are to be displayed"
       
  1559 
       
  1560     "need a device font for query"
       
  1561     font := font on:device.
       
  1562     ^ numberOfLines * fontHeight + topMargin + font descent + (lineSpacing) + (margin * 2)
       
  1563 
       
  1564     "Created: 27.1.1996 / 16:55:39 / cg"
  1555 !
  1565 !
  1556 
  1566 
  1557 heightOfContents
  1567 heightOfContents
  1558     "return the height of the contents in pixels
  1568     "return the height of the contents in pixels
  1559      - used for scrollbar interface"
  1569      - used for scrollbar interface"
  2779 ! !
  2789 ! !
  2780 
  2790 
  2781 !ListView class methodsFor:'documentation'!
  2791 !ListView class methodsFor:'documentation'!
  2782 
  2792 
  2783 version
  2793 version
  2784     ^ '$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.58 1996-01-27 11:51:29 cg Exp $'
  2794     ^ '$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.59 1996-01-27 17:32:13 cg Exp $'
  2785 ! !
  2795 ! !