bbtk/bbs/appli/exampleCutModule2.bbs

   1 load vtk
   2 load wxvtk
   3 load creaMaracasVisu
   4 load std
   5 load wx
   6
   7 new FileSelector filselect0
   8         set filselect0.Message "Select image"
   9         set filselect0.Wildcard "*.mhd"
  10         #set filselect0.DefaultDir "C:\Creatis\creaAppli\Data\Images"
  11 new MetaImageReader gimm
  12                 connect filselect0.Out gimm.In
  13 new ImageCastToUShort image
  14         connect gimm.Out image.In
  15
  16 new VolumeRendering volrend
  17                 connect image.Out volrend.In1
  18 new SurfaceRendering surrend
  19               # connect image.Out surrend.In0
  20
  21 new ViewerNV view1
  22 set view1.nTypeView 6
  23                 connect gimm.Out view1.In
  24
  25 new CutModule2 cut
  26         connect view1.Interactor1 cut.Interactor
  27         connect view1.Renderer1 cut.Renderer
  28         connect image.Out cut.In
  29
  30 new ViewerNV view2
  31         set view2.nTypeView 6
  32         connect image.Out view2.In
  33
  34 connect view1.BoxChange cut.BoxExecute
  35
  36 new LayoutSplit layoutsplit1
  37                 set layoutsplit1.Orientation V
  38                 connect volrend.Widget layoutsplit1.Widget1
  39                 connect surrend.Widget layoutsplit1.Widget2
  40
  41                 new LayoutSplit layoutsplit2
  42                                 set layoutsplit2.Orientation H
  43                                 connect layoutsplit1.Widget layoutsplit2.Widget1
  44                                 #connect view1.Widget layoutsplit2.Widget2
  45
  46                 new LayoutTab laytab
  47                                 connect laytab.Widget layoutsplit2.Widget2
  48                                 connect view1.Widget laytab.Widget2
  49                         connect view2.Widget laytab.Widget1
  50
  51 new LayoutLine layoutline1
  52         connect cut.Widget layoutline1.Widget1
  53
  54 new LayoutSplit layoutsplit3
  55         set layoutsplit3.Orientation H
  56         set layoutsplit3.Proportion 80
  57                 set layoutsplit3.WinTitle "Cutting Tool"
  58         connect layoutline1.Widget layoutsplit3.Widget2
  59         connect layoutsplit2.Widget layoutsplit3.Widget1
  60
  61 exec layoutsplit3
  62
  63 set cut.BoxExecute 1
  64 exec cut
  65
  66 connect view2.Renderer1 volrend.Renderer
  67 connect view2.Renderer1 surrend.Renderer
  68
  69 exec volrend
  70 exec surrend
  71
  72 #connect cut.BoxChange volrend.BoxExecute
  73 #connect cut.BoxChange volrend.BoxExecute