Hi!
Here is a new example:
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= v := RTView new. shape := RTMultiCompositeShape new. shape add: RTLabel new. shape add: RTBox new. es := shape elementsOn: RTShape withAllSubclasses.
v addAll: es.
RTNest new for: es inShape: #second add: [ :group :model | group addAll: ((RTBox new color: Color blue) elementsOn: model methods). RTGridLayout on: group. ].
RTFlowLayout new on: es. es @ RTPopup @ RTDraggable. v open -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
The last release of Roassal2 should address the comments of Leo and Doru I think…
Alexandre