Hello,
I would like to add a Morph with a splitter in the DrGeo window.
So far I am using LayoutFrame with fixed pixel offset to adjust the
various components of a DrGeo window (see code below)
Now I don't understand how I can hide the rightPanel morph, and get the
area morph to take the whole horizontal extent. Message hideLeftOrTop
only hide the morph but do not change the layout of remaining visible morph
I can hand change the layout but I wonder if there are any proporer way
to do it?
All in all, I would like to simulate a collapse function in the splitter.
Hilaire
installTools
| bar shiftY statusY rightPanel|
rightPanel := Morph new color: Color blue.
shiftY := DrGDefault isTablet ifFalse: [self installMenu] ifTrue: [0].
shiftY := self installToolbarsAt: shiftY.
statusY := self statusbar minExtent y max: DrGDefault wheelWidth.
self addMorph: area
fullFrame: (LayoutFrame
fractions: (0.1 @ 0 corner: 1 @ 1)
offsets: (0 @ shiftY corner: DrGDefault wheelWidth
negated @ statusY
negated)).
self addMorph: rightPanel
fullFrame: (LayoutFrame
fractions: (0 @ 0 corner: 0.1 @ 1)
offsets: (0 @ shiftY corner: 0 @ statusY negated)).
self installWheelsFrom: shiftY to: statusY.
self addMorph: self statusbar
fullFrame: (LayoutFrame
fractions: (0 @ 1 corner: 1 @ 1)
offsets: (0 @ statusY negated corner: (DrGDefault
wheelWidth +
DrGDefault wheelHeight) negated @ 0)).
self statusbar
borderStyle: (BorderStyle inset width: 1);
cornerStyle: #square.
self themeChanged; openInWorld
