packages/demo/bbs/appli/demoViewMulti.bbs

   1 load vtk
   2 load wxvtk
   3 load creaMaracasVisu
   4 load std
   5 load wx
   6 load creaImageIO
   7
   8 new Gimmick gimm0
   9         set gimm0.BoxProcessMode "Reactive"
  10 new Gimmick gimm1
  11         set gimm1.BoxProcessMode "Reactive"
  12
  13 new ViewerNV view0
  14         connect gimm0.BoxChange view0.BoxExecute
  15         set view0.nTypeView "6"
  16         connect gimm0.Out view0.In
  17
  18 new ViewerNV view1
  19         connect gimm0.BoxChange view1.BoxExecute
  20         set view1.nTypeView "-1"
  21         connect gimm0.Out view1.In
  22
  23 new ViewerNV view2
  24         connect gimm1.BoxChange view2.BoxExecute
  25         set view2.nTypeView "-1"
  26         connect gimm1.Out view2.In
  27
  28
  29 new VolumeRendering volrend
  30         connect view0.BoxChange volrend.BoxExecute
  31         connect view0.Renderer1 volrend.Renderer
  32
  33 new IRMViewer irmview
  34         connect view0.BoxChange irmview.BoxExecute
  35         connect view0.Renderer1 irmview.Renderer
  36
  37 new CommandButton commandbutton0
  38         connect commandbutton0.BoxChange gimm0.BoxExecute
  39         set commandbutton0.Label "Load image1"
  40
  41 new CommandButton commandbutton1
  42         connect commandbutton1.BoxChange gimm1.BoxExecute
  43         set commandbutton1.Label "Load image2"
  44
  45 new LayoutLine layoutline0
  46         set layoutline0.Orientation V
  47         connect commandbutton0.Widget layoutline0.Widget1
  48         connect commandbutton1.Widget layoutline0.Widget2
  49         connect irmview.Widget layoutline0.Widget3
  50         connect volrend.Widget layoutline0.Widget4
  51
  52 new LayoutSplit layoutline1
  53         set layoutline1.Orientation H
  54         connect view0.Widget layoutline1.Widget1
  55         new LayoutLine layoutLine1o1
  56                 connect view1.Widget layoutLine1o1.Widget1
  57                 connect view2.Widget layoutLine1o1.Widget2
  58         connect layoutLine1o1.Widget layoutline1.Widget2
  59
  60 new LayoutSplit mainLayoutSplit
  61         set mainLayoutSplit.Orientation H
  62         connect layoutline0.Widget mainLayoutSplit.Widget1
  63         connect layoutline1.Widget mainLayoutSplit.Widget2
  64
  65
  66 new ViewerNV viewimage0
  67         set viewimage0.nTypeView "6 0 1 2"
  68         connect gimm0.Out viewimage0.In
  69         connect gimm0.BoxChange viewimage0.BoxExecute
  70 new ViewerNV viewimage1
  71         set viewimage1.nTypeView "6 0 1 2"
  72         connect gimm1.Out viewimage1.In
  73         connect gimm1.BoxChange viewimage1.BoxExecute
  74
  75 new LayoutTab mainLayoutTab
  76         connect mainLayoutSplit.Widget mainLayoutTab.Widget1
  77         connect viewimage0.Widget mainLayoutTab.Widget2
  78         connect viewimage1.Widget mainLayoutTab.Widget3
  79
  80
  81 exec mainLayoutTab