*** empty log message ***

[bbtk.git] / packages / toolsbbtk / bbs / appli / GUICreateBlackBox.bbs

diff --git a/packages/toolsbbtk/bbs/appli/GUICreateBlackBox.bbs b/packages/toolsbbtk/bbs/appli/GUICreateBlackBox.bbs
index a23fc3c25ea9e5bf298f775b9db97b56929025d3..0a83f8a242726f2066d986abaf873510d6934297 100644 (file)
--- a/packages/toolsbbtk/bbs/appli/GUICreateBlackBox.bbs
+++ b/packages/toolsbbtk/bbs/appli/GUICreateBlackBox.bbs
@@ -1,18 +1,18 @@
-description "Creates the XML or C++ code for a new black box"
-author "eduardo.davila at creatis.insa-lyon.fr"
+description "Creates the XML or C++ code for a new black box (interface for bbCreateBlackBox)"
+author "eduardo.davila@creatis.insa-lyon.fr"
 category "toolsbbtk"
 
 load std 
 load wx
 
 new OutputText windowTitle
-  set windowTitle.In "Black box informations"
+  set windowTitle.In "Create new black box in folder :"
 
 new DirectorySelector dir
     set dir.Message "Select the location of your new black box"
 
 new InputText nameBlackbox
-    set nameBlackbox.Title "Blackbox name         (1 word)"
+    set nameBlackbox.Title "Black box name         (1 word)"
     set nameBlackbox.In "BLACKBOX_NAME"
 
 new InputText namePackage
@@ -32,17 +32,18 @@ new InputText description
 
 
 new RadioButton typeBlackbox
-  set typeBlackbox.Title "Type of the blackbox :"
-  set typeBlackbox.In0 "std-template"
-  set typeBlackbox.In1 "VTK_PolyDataAlgorithm-template"
-  set typeBlackbox.In2 "VTK_ImageAlgorithm-template"
-  set typeBlackbox.In3 "widget-template "
+  set typeBlackbox.Title "Type of the black box :"
+  set typeBlackbox.In0 "Basic  (inherits AtomicBlackBox, no particular Input/Output)"
+  set typeBlackbox.In1 "Widget (inherits WxBlackBox, has output 'Widget' of type 'wxWindow*')"
+  set typeBlackbox.In2 "VTK PolyDataAlgorithm (inherits AtomicBlackBox and a vtkPolyDataAlgorithm, has standard vtk I/O)"
+  set typeBlackbox.In3 "VTK ImageAlgorithm    (inherits AtomicBlackBox and a vtkImageAlgorithm, has standard vtk I/O)"
+
 
 new StringSelect stringselectorType
   set stringselectorType.In0 "std"
-  set stringselectorType.In1 "VTK_PolyDataAlgorithm"
-  set stringselectorType.In2 "VTK_ImageAlgorithm"
-  set stringselectorType.In3 "widget"
+  set stringselectorType.In1 "widget"
+  set stringselectorType.In2 "VTK_PolyDataAlgorithm"
+  set stringselectorType.In3 "VTK_ImageAlgorithm"
   connect  typeBlackbox.Out stringselectorType.In
 
 #---------------------------------------------------------------------
@@ -63,37 +64,41 @@ new StringSelect stringselectorFormat
 new OutputText dirOutput
   connect dir.Out dirOutput.In
 
-new LayoutLine layoutHor
-  set  layoutHor.Orientation H
-  connect typeBlackbox.Widget layoutHor.Widget1
-  connect formatBlackbox.Widget layoutHor.Widget2
+new LayoutLine layoutTop
+  connect windowTitle.Widget layoutTop.Widget1
+  connect dirOutput.Widget layoutTop.Widget2
+  connect nameBlackbox.Widget layoutTop.Widget3
+  connect namePackage.Widget layoutTop.Widget4
+  connect author.Widget layoutTop.Widget5
+  connect description.Widget layoutTop.Widget6
 
-#new CommandButton cancelButton
-#    set cancelButton.In "quit"
-#    set cancelButton.Label "Cancel"
+new LayoutSplit layoutTypeFormat
+  connect typeBlackbox.Widget layoutTypeFormat.Widget1
+  connect formatBlackbox.Widget layoutTypeFormat.Widget2
+  set layoutTypeFormat.Proportion 60
 
 new CommandButton createButton
     set createButton.In "print $concatStr.Out$; exec command; "
     set createButton.Label "Run"
 
-new LayoutLine buttons
-    set buttons.Orientation Horizontal
+new LayoutLine layoutButtons
+    set layoutButtons.Orientation Horizontal
 #    connect cancelButton.Widget buttons.Widget1
-    connect createButton.Widget buttons.Widget2
-
-new LayoutLine main
-    connect windowTitle.Widget main.Widget1
-    connect dirOutput.Widget main.Widget2
-    connect nameBlackbox.Widget main.Widget3
-    connect namePackage.Widget main.Widget4
-    connect author.Widget main.Widget5
-    connect description.Widget main.Widget6
-    connect layoutHor.Widget main.Widget7
-    connect buttons.Widget main.Widget8
+    connect createButton.Widget layoutButtons.Widget2
+
+new LayoutSplit layoutBot
+    connect layoutTypeFormat.Widget layoutBot.Widget1
+    connect layoutButtons.Widget layoutBot.Widget2
+    set layoutBot.Proportion 70
+
+new LayoutSplit main
+    connect layoutTop.Widget main.Widget1
+    connect layoutBot.Widget main.Widget2
+    set main.Proportion 50
     set main.WinTitle "Create new black box"
-    set main.WinDialog true
-    set main.WinWidth 350 
-    set main.WinHeight 520 
+#    set main.WinDialog true
+    set main.WinWidth 700 
+    set main.WinHeight 600 
 
 #---------------------------------------------------------------------