]> Creatis software - bbtk.git/blobdiff - packages/wx/bbs/appli/testSplitInSplit.bbs
*** empty log message ***
[bbtk.git] / packages / wx / bbs / appli / testSplitInSplit.bbs
index 8e7e11e2521863535715a5b182ceac5ade4a106f..b9575e141c15588f86c3cb94a7d96848439f0eba 100644 (file)
@@ -5,65 +5,69 @@ category "test"
 load std
 load wx
 
+
+#----- I N T E R F A C E  -------------------------------------
+
+
 new Split 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
+  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 Split upLeft
-#set upLeft.Proportion 80
 
 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 Split upLeft
+    #set upLeft.Proportion 80
+    new Slider eed
+    connect eed.Widget upLeft.Widget1
+    new Slider sUpLeft
+    connect sUpLeft.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