packages/wx/bbs/appli/exampleSimpleLayoutTRight.bbs

   1 description "Simple test of wx::LayoutTRight widgets"
   2 author "jean-pierre.roux [at] creatis [dot] univ [dash] lyon1 [dot] fr"
   3 category "example"
   4
   5 load std
   6 include wx
   7
   8 new LayoutTRight main
   9
  10 new Slider s1
  11    set s1.Title "SliderLeft"
  12    set s1.Orientation V
  13
  14 new Slider s2
  15    set s2.Title "SliderRigthUpt"
  16
  17 new Slider s3
  18    set s3.Title "SliderRightDown"
  19
  20 connect s1.Widget main.Widget1
  21 connect s2.Widget main.Widget2
  22 connect s3.Widget main.Widget3
  23
  24 exec main