> On Dec 13, 2019, at 8:39 AM, Thiede, Christoph <Christoph.Thiede at student.hpi.uni-potsdam.de> wrote:
> 
> 
> Hi Marcel,
> 
> 
> 
> Personally, I have looked up your Examples of * configuration mails a few times so far. I'd find it quite helpful if you could store them as a class-side example method into the relevant classes :-)
> 

+1
> 
> Best,
> 
> Christoph
> 
> Von: Squeak-dev <squeak-dev-bounces at lists.squeakfoundation.org> im Auftrag von Taeumel, Marcel
> Gesendet: Dienstag, 15. Oktober 2019 09:34:18
> An: gettimothy via Squeak-dev
> Betreff: [squeak-dev] Examples of PluggableListMorph configuration
>  
> Hi, all.
> 
> Update your Trunk image and try this:
> 
> <image.png>
> 
> | model view |
> model := SystemNavigation default allClasses collect: #name.
> 
> view := PluggableListMorph
> on: model
> list: #yourself
> selected: nil
> changeSelected: nil.
> 
> view extent: 200 at 300.
> view listFilterSet: 'Hand'.
> 
> view openInHand.
> 
> "Play around with horizontal alignment."
> view listMorph cellPositioning: #leftCenter.
> view listMorph cellPositioning: #center.
> view listMorph cellPositioning: #rightCenter.
> 
> "Play around with margins."
> view listMorph cellInset: 0.
> view listMorph cellInset: 3 at 0.
> view listMorph cellInset: (10 at 5 corner: 10 at 5).
> view listMorph cellInset: (0@ -1 corner: 0 @ -1).
> 
> "Fit all contents."
> view listMorph
> hResizing: #shrinkWrap;
> vResizing: #shrinkWrap. "always set anyway"
> view
> hResizing: #shrinkWrap;
> vResizing: #shrinkWrap.
> "Enable horizontal scrolling"
> view
> hResizing: #rigid;
> hScrollBarPolicy: #whenNeeded;
> width: 100.
> "Disable horizontal scrolling"
> view hScrollBarPolicy: #never.
> 
> Best,
> Marcel
> 
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.squeakfoundation.org/pipermail/squeak-dev/attachments/20191213/b3d7adb1/attachment.html>