packages/wx/bbs/appli/exampleTestInputOutput2Behaviours.bbs

   1 # ---------------------------------------------------------------------
   2 #
   3 # Copyright (c) CREATIS (Centre de Recherche en Acquisition et Traitement de l'Image
   4 #                        pour la SantÈ)
   5 # Authors : Eduardo Davila, Frederic Cervenansky, Claire Mouton
   6 # Previous Authors : Laurent Guigues, Jean-Pierre Roux
   7 # CreaTools website : www.creatis.insa-lyon.fr/site/fr/creatools_accueil
   8 #
   9 #  This software is governed by the CeCILL-B license under French law and
  10 #  abiding by the rules of distribution of free software. You can  use,
  11 #  modify and/ or redistribute the software under the terms of the CeCILL-B
  12 #  license as circulated by CEA, CNRS and INRIA at the following URL
  13 #  http://www.cecill.info/licences/Licence_CeCILL-B_V1-en.html
  14 #  or in the file LICENSE.txt.
  15 #
  16 #  As a counterpart to the access to the source code and  rights to copy,
  17 #  modify and redistribute granted by the license, users are provided only
  18 #  with a limited warranty  and the software's author,  the holder of the
  19 #  economic rights,  and the successive licensors  have only  limited
  20 #  liability.
  21 #
  22 #  The fact that you are presently reading this means that you have had
  23 #  knowledge of the CeCILL-B license and that you accept its terms.
  24 # ------------------------------------------------------------------------ */
  25
  26
  27 description "Input/OutputText widgets example"
  28 author "info-dev at creatis.insa-lyon.fr"
  29 category "example"
  30
  31 // To show two behaviours
  32
  33 load std
  34 load wx
  35
  36 new InputText text1
  37
  38 new OutputText outtext1
  39   // immediate display
  40   set outtext1.BoxProcessMode Reactive
  41   connect text1.Out outtext1.In
  42
  43 new InputText text2
  44
  45 new OutputText outtext2
  46   // waits for boxchange of RUN button
  47   connect text2.Out outtext2.In
  48
  49 new CommandButton btn
  50   set btn.Label "Run"
  51   connect btn.BoxChange outtext2.BoxExecute
  52
  53 new LayoutLine main
  54   connect text1.Widget main.Widget1
  55   connect outtext1.Widget main.Widget2
  56   connect text2.Widget main.Widget3
  57   connect outtext2.Widget main.Widget4
  58   connect btn.Widget main.Widget5
  59
  60 exec main