AlignmentMorph newColumn
Last updated at 3:12 pm UTC on 9 January 2022
StringMorph test openInWorld
| c |
c := AlignmentMorph newColumn.
SystemOrganization categories do:
[:cat | c addMorph: (StringMorph new contents: cat)].
^ c
StringMorph test2 openInWorld
container := AlignmentMorph newColumn.
container color: Color blue .
container hResizing: #shrinkWrap;
vResizing: #shrinkWrap.
m2 := Morph new color: Color lightGray.
m2 extent: 400@200.
m1 := (StringMorph new contents: 'A title (made with a StringMorph)'; color: Color white).
m1 hResizing: #spaceFill.
container addMorph: m1.
container addMorphBack: m2.
container openInHand
Note: The AlignmentMorph may be replaced by any Morph class
See also
Example where one TextMorph instance is stacked on top of another one