]> Creatis software - bbtk.git/commitdiff
Add some examples
authorjean-pierre roux <jean-pierre.roux@creatis.insa-lyon.fr>
Mon, 18 Feb 2008 17:36:26 +0000 (17:36 +0000)
committerjean-pierre roux <jean-pierre.roux@creatis.insa-lyon.fr>
Mon, 18 Feb 2008 17:36:26 +0000 (17:36 +0000)
packages/wx/bbs/appli/exLayoutTRight.bbs [deleted file]
packages/wx/bbs/appli/exempleComplexLinesInRows.bbs [new file with mode: 0644]
packages/wx/bbs/appli/exempleComplexSplitInSplit.bbs [new file with mode: 0644]
packages/wx/bbs/appli/exempleLayoutTDown.bbs [moved from packages/wx/bbs/appli/exLayoutTDown.bbs with 100% similarity]
packages/wx/bbs/appli/exempleLayoutTLeft.bbs [moved from packages/wx/bbs/appli/exLayoutTLeft.bbs with 100% similarity]
packages/wx/bbs/appli/exempleLayoutTUp.bbs [moved from packages/wx/bbs/appli/exLayoutTUp.bbs with 100% similarity]
packages/wx/bbs/appli/testSplitInSplit.bbs [deleted file]

diff --git a/packages/wx/bbs/appli/exLayoutTRight.bbs b/packages/wx/bbs/appli/exLayoutTRight.bbs
deleted file mode 100644 (file)
index 26600cb..0000000
+++ /dev/null
@@ -1,24 +0,0 @@
-description "Simple test of wx::LayoutTRight widgets"
-author "jean-pierre.roux@creatis.univ-lyon1.fr"
-category "test"
-
-load std
-include wx
-
-new LayoutTRight main
-
-new Slider s1
-   set s1.Title "SliderLeft"
-   set s1.Orientation V
-
-new Slider s2
-   set s2.Title "SliderRigthUpt"
-
-new Slider s3
-   set s3.Title "SliderRightDown"
-
-connect s1.Widget main.Widget1 
-connect s2.Widget main.Widget2 
-connect s3.Widget main.Widget3
-
-exec main
diff --git a/packages/wx/bbs/appli/exempleComplexLinesInRows.bbs b/packages/wx/bbs/appli/exempleComplexLinesInRows.bbs
new file mode 100644 (file)
index 0000000..1d426fc
--- /dev/null
@@ -0,0 +1,144 @@
+description "More complicated example of wx::Split widgets"
+author "jean-pierre.roux@creatis.univ-lyon1.fr"
+category "test"
+
+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
+//                        |         |           |
+//                        ----------------------
+new LayoutLine main
+ set main.Orientation V
+
+new LayoutLine up
+  set up.Orientation H
+
+new LayoutLine down
+  set down.Orientation V
+  new Slider s1Down
+      set s1Down.Title "s1Down"
+  connect s1Down.Widget   down.Widget1
+     
+ new LayoutLine 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 LayoutLine upLeft
+  
+    new Slider sUpLeft10
+      set sUpLeft10.Title "sUpLeft10"
+    connect sUpLeft10.Widget upLeft.Widget1
+    new Slider sUpLeft11
+      set sUpLeft11.Title "sUpLeft11"
+    connect sUpLeft11.Widget upLeft.Widget2
+    new Slider sUpLeft12
+      set sUpLeft12.Title "sUpLeft12"
+    connect sUpLeft12.Widget upLeft.Widget3            
+    new Slider sUpLeft13
+      set sUpLeft13.Title "sUpLeft13"
+    connect sUpLeft13.Widget upLeft.Widget4
+
+    new Slider sUpLeft14
+      set sUpLeft14.Title "sUpLeft14"
+    connect sUpLeft14.Widget upLeft.Widget5
+    new Slider sUpLeft15
+      set sUpLeft15.Title "sUpLeft15"
+    connect sUpLeft15.Widget upLeft.Widget6
+    new Slider sUpLeft16
+      set sUpLeft16.Title "sUpLeft16"
+    connect sUpLeft16.Widget upLeft.Widget7            
+    new Slider sUpLeft17
+      set sUpLeft17.Title "sUpLeft17"
+    connect sUpLeft17.Widget upLeft.Widget8
+  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
+*/
+
diff --git a/packages/wx/bbs/appli/exempleComplexSplitInSplit.bbs b/packages/wx/bbs/appli/exempleComplexSplitInSplit.bbs
new file mode 100644 (file)
index 0000000..62b4f0e
--- /dev/null
@@ -0,0 +1,130 @@
+description "More complicated example of wx::Split widgets"
+author "jean-pierre.roux@creatis.univ-lyon1.fr"
+category "test"
+
+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
+//                        |         |           |
+//                        ----------------------
+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 objetsare 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
+*/
+
diff --git a/packages/wx/bbs/appli/testSplitInSplit.bbs b/packages/wx/bbs/appli/testSplitInSplit.bbs
deleted file mode 100644 (file)
index e662920..0000000
+++ /dev/null
@@ -1,91 +0,0 @@
-description "Simple test of wx::Split 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 LayoutSplit main
- set main.Orientation V
-
-new LayoutSplit up
-set up.Orientation H
-
-new LayoutSplit 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 Down"
-    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
-
-
-connect up.Widget   main.Widget1
-connect down.Widget main.Widget2
-
-
-  new LayoutSplit 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 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
-*/
-