load std load wx // ---------------- // | W1 | // | | // |------|-------| // | W3 | W2 | // | | | // ---------------- define LayoutTUp wx description "Creates a 'T like' complex container : Up {DownLeft, DownRight} as w1{w2,w3}" author "jean-pierre.roux@creatis.univ-lyon1.fr" category "complex box, widget" new LayoutSplit currentBox set currentBox.Orientation V new LayoutSplit down connect down.Widget currentBox.Widget2 set down.Orientation H input Widget1 currentBox.Widget1 "Up container" input Widget2 down.Widget1 "DownLeft container" input Widget3 down.Widget2 "DownRight container" endefine