Class: SeparatingLineEntry (private in ListEntry

• Inheritance
• Description
• Instance protocol
  • required protocol

Inheritance:

   Object
   |
   +--ListEntry
      |
      +--ListEntry::SeparatingLineEntry

Package:

stx:libwidg2

Category:

Views-Support

Owner:

ListEntry

Description:

an experiment (unfinished)

in a listView:
                                                                      [exBegin]
  |top slv wrapper l|

  l := OrderedCollection new.
  l add:'one'.
  l add:'two'.
  l add:(ListEntry separatingLineEntry).
  l add:'three'.
  
  slv := SelectionInListView new.
  slv list:l.
  wrapper := HVScrollableView forView:slv miniScrollerH:true.

  top := StandardSystemView extent:150@200.
  top add:wrapper in:(0.0@0.0 corner:1.0@1.0).
  top open.
                                                                      [exEnd]

Instance protocol:

 displayOn: aGC x: x y: y opaque: opaque

hFont := aGC font height.

 widthOn: aGC

(comment from inherited method)
return the width (in device units) of the receiver when displayed in aGC