X-Git-Url: https://git.creatis.insa-lyon.fr/pubgit/?a=blobdiff_plain;f=packages%2Ftoolsbbtk%2Fbbs%2Fappli%2FGUICreateBlackBox.bbs;h=898c4b078d52cf542527e733353481d72f5ccf23;hb=afd25e07d15ac97d576d94d01927d092e7f990f5;hp=38cbd77f9195b49235fd2e24cb3a2ee7a9d4f172;hpb=6ca1e9e935cdf36d2db70451088e87c09550564b;p=bbtk.git diff --git a/packages/toolsbbtk/bbs/appli/GUICreateBlackBox.bbs b/packages/toolsbbtk/bbs/appli/GUICreateBlackBox.bbs index 38cbd77..898c4b0 100644 --- a/packages/toolsbbtk/bbs/appli/GUICreateBlackBox.bbs +++ b/packages/toolsbbtk/bbs/appli/GUICreateBlackBox.bbs @@ -1,3 +1,29 @@ +# --------------------------------------------------------------------- +# +# Copyright (c) CREATIS (Centre de Recherche en Acquisition et Traitement de l'Image +# pour la SantÈ) +# Authors : Eduardo Davila, Frederic Cervenansky, Claire Mouton +# Previous Authors : Laurent Guigues, Jean-Pierre Roux +# CreaTools website : www.creatis.insa-lyon.fr/site/fr/creatools_accueil +# +# This software is governed by the CeCILL-B license under French law and +# abiding by the rules of distribution of free software. You can use, +# modify and/ or redistribute the software under the terms of the CeCILL-B +# license as circulated by CEA, CNRS and INRIA at the following URL +# http://www.cecill.info/licences/Licence_CeCILL-B_V1-en.html +# or in the file LICENSE.txt. +# +# As a counterpart to the access to the source code and rights to copy, +# modify and redistribute granted by the license, users are provided only +# with a limited warranty and the software's author, the holder of the +# economic rights, and the successive licensors have only limited +# liability. +# +# The fact that you are presently reading this means that you have had +# knowledge of the CeCILL-B license and that you accept its terms. +# ------------------------------------------------------------------------ */ + + description "Creates the XML or C++ code for a new black box (interface for bbCreateBlackBox)" author "eduardo.davila@creatis.insa-lyon.fr" category "toolsbbtk" @@ -78,7 +104,7 @@ new LayoutSplit layoutTypeFormat set layoutTypeFormat.Proportion 60 new CommandButton createButton - set createButton.In "print $concatStr.Out$; exec command; " + set createButton.In "print $concatStr.Out$; exec command; exec Box02;" set createButton.Label "Run" new LayoutLine layoutButtons @@ -191,6 +217,23 @@ new ConcatStrings concatStr new ExecSystemCommand command connect concatStr.Out command.In +## ------------------------------------------------ +new OutputText Box01 + set Box01.In " OK... Box created..." + set Box01.WinDialog true + set Box01.WinHeight 100 + set Box01.WinTitle Confirmation + set Box01.WinWidth 400 + +new LayoutLine Box02 + set Box02.WinDialog true + set Box02.WinHeight 200 + set Box02.WinTitle Confirmation + set Box02.WinWidth 400 + connect Box01.Widget Box02.Widget2 + + new OutputText Box03 + connect Box03.Widget Box02.Widget1 exec dir exec main