Normalize names

[bbtk.git] / packages / wx / bbs / appli / exampleComplexLayoutSplit_In_LayoutSplit.bbs

diff --git a/packages/wx/bbs/appli/exampleComplexLayoutSplit_In_LayoutSplit.bbs b/packages/wx/bbs/appli/exampleComplexLayoutSplit_In_LayoutSplit.bbs
new file mode 100644 (file)
index 0000000..09582d9
--- /dev/null
+++ b/packages/wx/bbs/appli/exampleComplexLayoutSplit_In_LayoutSplit.bbs
@@ -0,0 +1,136 @@
+description "Simple test of wx::LayoutSplit widgets"
+author "jean-pierre.roux@creatis.univ-lyon1.fr"
+category "example;widget"
+
+load std
+load wx
+
+
+#----- I N T E R F A C E  -------------------------------------
+
+// Just to see the mess when you want something not so simple...
+
+//                          upLeft    upRight
+//                        ----------|-----------|
+//                        |         |           |
+//                        |         |           |
+//                        |         |           |
+//      UP                |---------|           |
+//                        |         |           |
+//                        |         |           |
+//                        |         |           |
+//     ----------         -----------------------
+//                        |                     |
+//                        |                     |
+//                        |                     |
+//                        |                     |
+//        DOWN            ----------|-----------|
+//                        |         |           |
+//                        |         |           |
+//                        |         |           |  downDown
+//                        |         |           |
+//                        ----------------------
+//
+// Better use a mix of LayoutTxxx (xxx = Up, Down, Right, Left)!
+//
+//
+// TODO : add same structure using only  LayoutTxxx
+ 
+new LayoutSplit main
+ set main.Orientation V
+
+new LayoutSplit up
+set up.Orientation H
+
+new LayoutSplit down
+  set down.Orientation V
+  new Slider s1Down
+      set s1Down.Title "s1Down"
+  connect s1Down.Widget   down.Widget1
+     
+ new LayoutSplit downDown
+  set downDown.Orientation H
+  
+  connect downDown.Widget down.Widget2 
+     
+  new RadioButton rb1
+    set rb1.Title "Rad But DownLeft"
+    set rb1.In0 "Choix 1"
+    set rb1.In1 "Choix 2"
+    set rb1.In2 "Choix 3"
+    set rb1.In3 "Choix 4"
+    set rb1.In 1
+   connect rb1.Widget downDown.Widget1
+
+
+  new RadioButton rb2
+    set rb2.Title "Rad But DownLeft"
+    set rb2.In0 "Choix 1"
+    set rb2.In1 "Choix 2"
+    set rb2.In2 "Choix 3"
+    set rb2.In3 "Choix 4"
+    set rb2.In 4
+   connect rb2.Widget downDown.Widget2
+
+
+  connect up.Widget   main.Widget1
+  connect down.Widget main.Widget2
+
+
+  new LayoutSplit upLeft
+    set upLeft.Proportion 80
+    // only 2 objets are allowed here
+    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 LayoutLine upRight
+    set upRight.Orientation H
+    new Slider s1
+    set s1.Orientation V
+    set s1.Title "s1"
+    new Slider s2
+    set s2.Orientation V
+    set s2.Title "s2"
+    new Slider s3
+    set s3.Orientation V
+    set s3.Title "s3"
+    new Slider s4
+    set s4.Orientation V
+    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 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
+*/
+