packages/kw/bbs/appli/demoKW.bbs

   1 description "A tour of all kw widgets"
   2 author "laurent.guigues at creatis.insa-lyon.fr"
   3 category "demo"
   4
   5 print "=================================="
   6 print "A Slider whose output is plugged into an OutputText"
   7
   8 include kw
   9 load std
  10 new kwSlider in
  11 new kwOutputText out
  12 connect in.Out out.In
  13 connect in.BoxChange out.BoxExecute
  14 new kwLayoutSplit window
  15 connect in.Widget window.Widget1
  16 connect out.Widget window.Widget2
  17 exec window
  18 reset
  19
  20 print "=================================="
  21 print "The kwSlicer widget"
  22
  23 load kw
  24 include vtk
  25 load wx
  26
  27 new LoadHola r
  28 new kwSlicer s
  29 connect r.Out s.In
  30 exec s
  31 reset
  32
  33 print "=================================="
  34 print "Using both kw and wx"
  35
  36 load wx
  37 load kw
  38 load std
  39
  40 new OutputText t
  41 exec t
  42
  43 new kwSlider s
  44 connect s.Out t.In
  45 connect s.BoxChange t.BoxExecute
  46
  47 exec s