X-Git-Url: https://git.creatis.insa-lyon.fr/pubgit/?a=blobdiff_plain;f=packages%2Ftoolsbbtk%2Fbbs%2Fappli%2FGUICreateBlackBox.bbs;h=0a83f8a242726f2066d986abaf873510d6934297;hb=071ccbff9c9135e6f39fbd17d129f191cf76d202;hp=a23fc3c25ea9e5bf298f775b9db97b56929025d3;hpb=ecbed4dd1bba36ddf4dd82d71eec9bc8844da655;p=bbtk.git diff --git a/packages/toolsbbtk/bbs/appli/GUICreateBlackBox.bbs b/packages/toolsbbtk/bbs/appli/GUICreateBlackBox.bbs index a23fc3c..0a83f8a 100644 --- 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 #---------------------------------------------------------------------