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
  13 new MarchingCubes mc
  14   set mc.Value 1000
  15   connect reader.Out mc.In
  16
  17
  18 new FileSelector saveFileName
  19   set saveFileName.OpenSave Save
  20
  21 new PolyDataWriter pdw
  22   connect saveFileName.Out pdw.Filename
  23   connect mc.Out pdw.In
  24
  25 new PolyDataToActor pdActor
  26   connect mc.Out pdActor.In
  27
  28 new  Viewer3D viewer
  29   connect pdActor.Out viewer.In1
  30
  31 new CommandButton button
  32   set button.Label "Save vtkPolyData"
  33   connect button.BoxChange pdw.BoxExecute
  34
  35 new LayoutSplit main
  36   set main.Proportion 90
  37   connect viewer.Widget main.Widget1
  38   connect button.Widget main.Widget2
  39
  40 exec main
  41
  42