Hi, all.

Update your Trunk image and try this:


| model view |
model := {
SystemNavigation default allClasses collect: #name.
SystemNavigation default allClasses collect: #category.
}.

view := PluggableMultiColumnListMorph
on: model
list: #yourself
selected: nil
changeSelected: nil.

view extent: 200 at 300.
view listFilterSet: 'Hand'.

view openInHand.

"Play around with horizontal alignment."
view listMorphs first cellPositioning: #rightCenter.
view listMorphs second cellPositioning: #center.
view listMorphs do: [:col | col cellPositioning: #leftCenter].

"Play around with margins."
view listMorphs do: [:col | col cellInset: 0].
view listMorphs do: [:col | col cellInset: 3 at 0].
view listMorphs do: [:col | col cellInset: 5].

"Funny but not useful."
view listMorphs first cellInset: 3. view listMorphs second cellInset: 0.

"Fit all contents."
view listMorphs do: [:col | col
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/20191015/5630a2fe/attachment-0001.html>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: image.png
Type: image/png
Size: 77347 bytes
Desc: not available
URL: <http://lists.squeakfoundation.org/pipermail/squeak-dev/attachments/20191015/5630a2fe/attachment-0001.png>