Jerome,
Try this:
PluggableListMorph>>scrollToSelection | range index | index := scroller submorphs indexOf: selectedMorph ifAbsent:[^self]. ((selectedMorph bounds top - scroller offset y) >= 0 and:[ (selectedMorph bounds bottom - scroller offset y) < bounds height]) ifTrue:[^self]. range _ self leftoverScrollRange. scrollBar value: (range > 0 ifTrue: [((index-1 * selectedMorph height) / self leftoverScrollRange) truncateTo: scrollBar scrollDelta] ifFalse: [0]). scroller offset: -3 @ (range * scrollBar value)
-----Original Message----- From: squeak-dev-admin@lists.squeakfoundation.org [mailto:squeak-dev-admin@lists.squeakfoundation.org] On Behalf Of Jerome Chan Sent: Wednesday, July 03, 2002 12:26 AM To: squeak-dev@lists.squeakfoundation.org Subject: Scrolling selected item in listmorph to view?
How do I programmatically make the selected item in a listmorph appear?