1 description "Simple test of wx::LayoutSplit widgets"
2 author "jean-pierre.roux@creatis.univ-lyon1.fr"
9 #----- I N T E R F A C E -------------------------------------
11 // Just to see the mess when you want something not so simple...
14 // ----------|-----------|
22 // ---------- -----------------------
27 // DOWN ----------|-----------|
32 // ----------------------
34 // Better use a mix of LayoutTxxx (xxx = Up, Down, Right, Left)!
37 // TODO : add same structure using only LayoutTxxx
40 set main.Orientation V
46 set down.Orientation V
48 set s1Down.Title "s1Down"
49 connect s1Down.Widget down.Widget1
51 new LayoutSplit downDown
52 set downDown.Orientation H
54 connect downDown.Widget down.Widget2
57 set rb1.Title "Rad But DownLeft"
63 connect rb1.Widget downDown.Widget1
67 set rb2.Title "Rad But DownLeft"
73 connect rb2.Widget downDown.Widget2
76 connect up.Widget main.Widget1
77 connect down.Widget main.Widget2
80 new LayoutSplit upLeft
81 set upLeft.Proportion 80
82 // only 2 objets are allowed here
84 set sUpLeft1.Title "sUpLeft1"
85 connect sUpLeft1.Widget upLeft.Widget1
87 set sUpLeft2.Title "sUpLeft2"
88 connect sUpLeft2.Widget upLeft.Widget2
90 connect upLeft.Widget up.Widget1
93 new LayoutLine upRight
94 set upRight.Orientation H
107 connect s1.Widget upRight.Widget1
108 connect s2.Widget upRight.Widget2
109 connect s3.Widget upRight.Widget3
110 connect s4.Widget upRight.Widget4
111 connect upRight.Widget up.Widget2
113 #------p i p e l i n e---------------------------------------
115 #------------------------------------------------------------
119 #set main.WinDialog 1
123 set s1.BoxProcessMode 1
126 //print rb=$rb.Out$\n
133 print sUpLeft=$sUpLeft.Out$\n
134 print sDown=$sDown.Out$\n