X-Git-Url: https://git.creatis.insa-lyon.fr/pubgit/?a=blobdiff_plain;f=packages%2Fwx%2Fbbs%2Fappli%2FtestSizerInSizer.bbs;h=e158b046df297c1013af6e908246b7172b2ca4c4;hb=70a89719dcbe57e7c63dd82b7a30119b336f050d;hp=3a3eed7d175f1a946d5cd1db8d524ba81ab60999;hpb=fe455ba4df3ec334ad809d82a51f261f1edcd343;p=bbtk.git

diff --git a/packages/wx/bbs/appli/testSizerInSizer.bbs b/packages/wx/bbs/appli/testSizerInSizer.bbs
index 3a3eed7..e158b04 100644
--- a/packages/wx/bbs/appli/testSizerInSizer.bbs
+++ b/packages/wx/bbs/appli/testSizerInSizer.bbs
@@ -1,77 +1,91 @@
-description "Simple test of  wx::Sizer widgets"
+description "Simple test of wx::Sizer widgets"
 author "jean-pierre.roux@creatis.univ-lyon1.fr"
 category "test"
 
 load std
 load wx
 
+
+#----- I N T E R F A C E  -------------------------------------
+
+
 new Sizer main
-#set main.Orientation 1
+ set main.Orientation H
 
 new Sizer up
 set up.Orientation 0
 
 new Sizer down
-set down.Orientation 1
+  set down.Orientation 1
+  new Slider sDown
+      set sDown.Title "sDown"
+  connect sDown.Widget   down.Widget1
+  new RadioButton rb
+    set rb.Title "Rad But"
+    set rb.In0 "Choix 1"
+    set rb.In1 "Choix 2"
+    set rb.In2 "Choix 3"
+    set rb.In3 "Choix 4"
+    set rb.In 1
+   connect rb.Widget down.Widget2
 
-new Sizer upRight
-set upRight.Orientation 0
-
-new Sizer upLeft
 
 connect up.Widget   main.Widget1
 connect down.Widget main.Widget2
 
-connect upLeft.Widget  up.Widget1
-connect upRight.Widget up.Widget2
-
-# -- todo : add it, again later
-# --        (when RadioButton exists again)
-
-new RadioButton rb
-set rb.Title "Rad But"
-set rb.In0 "Choix 1"
-set rb.In1 "Choix 2"
-set rb.In2 "Choix 3"
-set rb.In3 "Choix 4"
-set rb.In 1
-
-
-new Slider sUpLeft
-new Slider sDown
-
-new Slider s1
-set s1.Orientation 1
-set s1.Title "s1"
-new Slider s2
-set s2.Orientation 1
-set s2.Title "s2"
-new Slider s3
-set s3.Orientation 1
-set s3.Title "s3"
-new Slider s4
-set s4.Orientation 1
-set s4.Title "s4"
-
-connect s1.Widget upRight.Widget1 
-connect s2.Widget upRight.Widget2 
-connect s3.Widget upRight.Widget3 
-connect s4.Widget upRight.Widget4 
-
-connect sUpLeft.Widget upLeft.Widget1
-connect rb.Widget      down.Widget2
-connect sDown.Widget   down.Widget1
-
-#graph
+
+  new Sizer upLeft
+    #set upLeft.Proportion 80
+    new Slider sUpLeft1
+      set sUpLeft1.Title "sUpLeft1"
+    connect sUpLeft1.Widget upLeft.Widget1
+    new Slider sUpLeft2
+      set sUpLeft2.Title "sUpLeft2"
+    connect sUpLeft2.Widget upLeft.Widget2
+  connect upLeft.Widget up.Widget1
+
+
+  new Sizer upRight
+    set upRight.Orientation 0
+    new Slider s1
+    set s1.Orientation 1
+    set s1.Title "s1"
+    new Slider s2
+    set s2.Orientation 1
+    set s2.Title "s2"
+    new Slider s3
+    set s3.Orientation 1
+    set s3.Title "s3"
+    new Slider s4
+    set s4.Orientation 1
+    set s4.Title "s4"
+    connect s1.Widget upRight.Widget1 
+    connect s2.Widget upRight.Widget2 
+    connect s3.Widget upRight.Widget3 
+    connect s4.Widget upRight.Widget4 
+  connect upRight.Widget up.Widget2
+
+#------p i p e l i n e---------------------------------------
+#...
+#------------------------------------------------------------
+
+
+//graph
 #set main.WinDialog 1
 exec main
 
+
 set s1.BoxProcessMode 1
 
-print rb=$rb.Out$\n
+
+//print rb=$rb.Out$\n
+
+/*
 print s1=$s1.Out$\n
 print s2=$s2.Out$\n
 print s3=$s3.Out$\n
 print s4=$s4.Out$\n
 print sUpLeft=$sUpLeft.Out$\n
 print sDown=$sDown.Out$\n
+*/
+