packages/vtk/bbs/appli/exampleSave_vtkPolyData.bbs

   1 description "Save a vtkPolyData example"
   2 author "info-dev at creatis.insa-lyon.fr"
   3 category "example mesh"
   4
   5 load wx
   6 load std
   7 load vtk
   8 load wxvtk
   9
  10 include "vtk/boxes/bbLoadHola"
  11 new LoadHola reader
  12 new MarchingCubes mc
  13   set mc.Value 1200
  14   connect reader.Out mc.In
  15
  16
  17 new FileSelector saveFileName
  18   set saveFileName.OpenSave Save
  19
  20 new PolyDataWriter pdw
  21   connect saveFileName.Out pdw.FileName
  22   connect mc.Out pdw.Out
  23
  24 new PolydataToActor pdActor
  25   connect mc.Out pdActor.In
  26
  27 new  Viewer3D viewer
  28   connect pdActor.Out viewer.In1
  29
  30 new CommandButton button
  31   set button.Label "Save vtkPolyData"
  32   connect button.BoxExecute pdw.BoxExecute
  33
  34 new LayoutSplit main
  35   set main.Proportion 90
  36   connect viewer.Widget main.Widget1
  37   connect button.Widget main.Widget2
  38
  39 exec viewer