X-Git-Url: https://git.creatis.insa-lyon.fr/pubgit/?a=blobdiff_plain;f=packages%2Fwx%2Fbbs%2Fappli%2FtestSplitInSplit.bbs;h=5485f3ebbc0c5fc6fb5da032acd8d2fd81f4333b;hb=70a89719dcbe57e7c63dd82b7a30119b336f050d;hp=b9575e141c15588f86c3cb94a7d96848439f0eba;hpb=33a30a5090bdde56ff9ecba764b4bb5dac3fe27e;p=bbtk.git

diff --git a/packages/wx/bbs/appli/testSplitInSplit.bbs b/packages/wx/bbs/appli/testSplitInSplit.bbs
index b9575e1..5485f3e 100644
--- a/packages/wx/bbs/appli/testSplitInSplit.bbs
+++ b/packages/wx/bbs/appli/testSplitInSplit.bbs
@@ -1,4 +1,4 @@
-description "Simple test of wx::Sizer widgets"
+description "Simple test of wx::Split widgets"
 author "jean-pierre.roux@creatis.univ-lyon1.fr"
 category "test"
 
@@ -10,17 +10,18 @@ load wx
 
 
 new Split main
- set main.Orientation H
+ set main.Orientation V
 
-new Sizer up
-set up.Orientation 0
+new Split up
+set up.Orientation H
 
-new Sizer down
-  set down.Orientation 1
+new Split down
+  set down.Orientation V
   new Slider sDown
+      set sDown.Title "sDown"
   connect sDown.Widget   down.Widget1
   new RadioButton rb
-    set rb.Title "Rad But"
+    set rb.Title "Rad But Down"
     set rb.In0 "Choix 1"
     set rb.In1 "Choix 2"
     set rb.In2 "Choix 3"
@@ -34,27 +35,29 @@ connect down.Widget main.Widget2
 
 
   new Split upLeft
-    #set upLeft.Proportion 80
-    new Slider eed
-    connect eed.Widget upLeft.Widget1
-    new Slider sUpLeft
-    connect sUpLeft.Widget upLeft.Widget2
+    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
+    set upRight.Orientation H
     new Slider s1
-    set s1.Orientation 1
+    set s1.Orientation V
     set s1.Title "s1"
     new Slider s2
-    set s2.Orientation 1
+    set s2.Orientation V
     set s2.Title "s2"
     new Slider s3
-    set s3.Orientation 1
+    set s3.Orientation V
     set s3.Title "s3"
     new Slider s4
-    set s4.Orientation 1
+    set s4.Orientation V
     set s4.Title "s4"
     connect s1.Widget upRight.Widget1 
     connect s2.Widget upRight.Widget2 
@@ -67,18 +70,22 @@ connect down.Widget main.Widget2
 #------------------------------------------------------------
 
 
-graph
+//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
-
+*/