1 # ---------------------------------------------------------------------
3 # Copyright (c) CREATIS (Centre de Recherche en Acquisition et Traitement de l'Image
5 # Authors : Eduardo Davila, Frederic Cervenansky, Claire Mouton
6 # Previous Authors : Laurent Guigues, Jean-Pierre Roux
7 # CreaTools website : www.creatis.insa-lyon.fr/site/fr/creatools_accueil
9 # This software is governed by the CeCILL-B license under French law and
10 # abiding by the rules of distribution of free software. You can use,
11 # modify and/ or redistribute the software under the terms of the CeCILL-B
12 # license as circulated by CEA, CNRS and INRIA at the following URL
13 # http://www.cecill.info/licences/Licence_CeCILL-B_V1-en.html
14 # or in the file LICENSE.txt.
16 # As a counterpart to the access to the source code and rights to copy,
17 # modify and redistribute granted by the license, users are provided only
18 # with a limited warranty and the software's author, the holder of the
19 # economic rights, and the successive licensors have only limited
22 # The fact that you are presently reading this means that you have had
23 # knowledge of the CeCILL-B license and that you accept its terms.
24 # ------------------------------------------------------------------------ */
27 description "Simple test of wx::LayoutSplit widgets"
28 author "jean-pierre.roux@creatis.univ-lyon1.fr"
35 #----- I N T E R F A C E -------------------------------------
37 // Just to see the mess when you want something not so simple...
40 // ----------|-----------|
48 // ---------- -----------------------
53 // DOWN ----------|-----------|
58 // ----------------------
60 // Better use a mix of LayoutTxxx (xxx = Up, Down, Right, Left)!
63 // TODO : add same structure using only LayoutTxxx
66 set main.Orientation V
72 set down.Orientation V
74 set s1Down.Title "s1Down"
75 connect s1Down.Widget down.Widget1
77 new LayoutSplit downDown
78 set downDown.Orientation H
80 connect downDown.Widget down.Widget2
83 set rb1.Title "Rad But DownLeft"
89 connect rb1.Widget downDown.Widget1
93 set rb2.Title "Rad But DownLeft"
99 connect rb2.Widget downDown.Widget2
102 connect up.Widget main.Widget1
103 connect down.Widget main.Widget2
106 new LayoutSplit upLeft
107 set upLeft.Proportion 80
108 // only 2 objets are allowed here
110 set sUpLeft1.Title "sUpLeft1"
111 connect sUpLeft1.Widget upLeft.Widget1
113 set sUpLeft2.Title "sUpLeft2"
114 connect sUpLeft2.Widget upLeft.Widget2
116 connect upLeft.Widget up.Widget1
119 new LayoutLine upRight
120 set upRight.Orientation H
133 connect s1.Widget upRight.Widget1
134 connect s2.Widget upRight.Widget2
135 connect s3.Widget upRight.Widget3
136 connect s4.Widget upRight.Widget4
137 connect upRight.Widget up.Widget2
139 #------p i p e l i n e---------------------------------------
141 #------------------------------------------------------------
145 #set main.WinDialog 1
149 set s1.BoxProcessMode 1
152 //print rb=$rb.Out$\n
159 print sUpLeft=$sUpLeft.Out$\n
160 print sDown=$sDown.Out$\n