packages/wxvtk/bbs/appli/exampleMIPWidget.bbs

   1 description "Example of MIPWidget."
   2 author "laurent.guigues at creatis.insa-lyon.fr"
   3 category "example"
   4
   5 include wxvtk/boxes/bbMIPWidget
   6 include vtk/boxes/bbLoadHola
   7
   8 new MIPWidget MIP
   9
  10 load wxvtk
  11 new Viewer3D viewer
  12 new LoadHola reader
  13
  14 connect reader.Out MIP.In
  15 connect MIP.Out viewer.In1
  16 connect MIP.BoxChange viewer.BoxExecute
  17
  18 new LayoutLine main
  19 connect viewer.Widget main.Widget1
  20 connect MIP.Widget main.Widget2
  21
  22 set MIP.Shift 300
  23 set MIP.Scale 200
  24 #set MIP.Colour "0.5 0 0"
  25 set MIP.Title "MIP Controls"
  26
  27 set main.WinTitle "ExampleMIPWidget"
  28 exec main