packages/wx/bbs/appli/exampleSynchronizeWidgets.bbs

   1 description "Show how to synchronize multiple sliders (when one changes all the others are updated)"
   2 author "laurent.guigues@creatis.insa-lyon.fr"
   3 category "example"
   4
   5 load wx
   6 load std
   7
   8 new Slider slider1
   9 new Slider slider2
  10 new Slider slider3
  11 new Slider slider4
  12 new LayoutLine layout
  13 new MagicBox position
  14
  15 set position.In 20
  16 set position.BoxProcessMode Reactive
  17
  18 connect slider1.Out position.In1
  19 connect slider2.Out position.In2
  20 connect slider3.Out position.In3
  21 connect slider4.Out position.In4
  22 connect position.Out slider1.In
  23 connect position.Out slider2.In
  24 connect position.Out slider3.In
  25 connect position.Out slider4.In
  26
  27 connect slider1.Widget layout.Widget1
  28 connect slider2.Widget layout.Widget2
  29 connect slider3.Widget layout.Widget3
  30 connect slider4.Widget layout.Widget4
  31
  32 //message process 3
  33 //message change 1
  34 //message data 1
  35 exec layout
  36