packages/wxvtk/bbs/appli/exampleViewerInLayoutTab.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
  28 description "Example :Viewer in a LayoutTab"
  29 author "jpr@creatis.univ-lyon1.fr"
  30 category "example"
  31
  32 // WARNING : Doesn't work, right now (25 Nov 2008)
  33 include std
  34 include vtk
  35 include wx
  36 include wxvtk
  37
  38
  39 new Slider slider1
  40    set slider1.Orientation V
  41 new Slider slider2
  42 new Slider slider3
  43
  44 new LoadHola reader
  45
  46 new Viewer2D viewer2DImageOriginal
  47 connect reader.Out viewer2DImageOriginal.In
  48 set viewer2DImageOriginal.Slice 20
  49
  50 new LayoutLine  sizer
  51 new LayoutTab main
  52
  53 connect slider2.Widget sizer.Widget1
  54 connect slider3.Widget sizer.Widget2
  55
  56 connect slider1.Widget main.Widget1
  57 connect sizer.Widget main.Widget2
  58 connect slider1.BoxChange viewer2DImageOriginal.BoxExecute
  59 connect viewer2DImageOriginal.Widget main.Widget3
  60
  61 exec viewer2DImageOriginal
  62 exec main