1 description "More complicated example of wx::LayoutLine widgets"
2 author "jean-pierre.roux@creatis.univ-lyon1.fr"
3 category "example;widget"
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 set main.Orientation V
40 set down.Orientation V
42 set s1Down.Title "s1Down"
43 connect s1Down.Widget down.Widget1
45 new LayoutLine downDown
46 set downDown.Orientation H
47 connect downDown.Widget down.Widget2
50 set rb1.Title "Rad But DownLeft"
56 connect rb1.Widget downDown.Widget1
60 set rb2.Title "Rad But DownLeft"
66 connect rb2.Widget downDown.Widget2
69 connect up.Widget main.Widget1
70 connect down.Widget main.Widget2
75 set sUpLeft10.Title "sUpLeft10"
76 connect sUpLeft10.Widget upLeft.Widget1
78 set sUpLeft11.Title "sUpLeft11"
79 connect sUpLeft11.Widget upLeft.Widget2
81 set sUpLeft12.Title "sUpLeft12"
82 connect sUpLeft12.Widget upLeft.Widget3
84 set sUpLeft13.Title "sUpLeft13"
85 connect sUpLeft13.Widget upLeft.Widget4
88 set sUpLeft14.Title "sUpLeft14"
89 connect sUpLeft14.Widget upLeft.Widget5
91 set sUpLeft15.Title "sUpLeft15"
92 connect sUpLeft15.Widget upLeft.Widget6
94 set sUpLeft16.Title "sUpLeft16"
95 connect sUpLeft16.Widget upLeft.Widget7
97 set sUpLeft17.Title "sUpLeft17"
98 connect sUpLeft17.Widget upLeft.Widget8
99 connect upLeft.Widget up.Widget1
101 new LayoutLine upRight
102 set upRight.Orientation H
115 connect s1.Widget upRight.Widget1
116 connect s2.Widget upRight.Widget2
117 connect s3.Widget upRight.Widget3
118 connect s4.Widget upRight.Widget4
119 connect upRight.Widget up.Widget2
121 #------p i p e l i n e---------------------------------------
123 #------------------------------------------------------------
127 #set main.WinDialog 1
131 set s1.BoxProcessMode 1
134 //print rb=$rb.Out$\n
141 print sUpLeft=$sUpLeft.Out$\n
142 print sDown=$sDown.Out$\n