description "Simple test of wx::Split widgets"
author "jean-pierre.roux@creatis.univ-lyon1.fr"
category "test"

load std
load wx

new LayoutSplit main
 set main.Orientation V
new LayoutSplit split2

new Slider s1
   set s1.Title "SliderUp"
new Slider s2
   set s2.Title "SliderDownLeft"
new Slider s3
   set s3.Title "SliderDownRight"

connect s1.Widget     main.Widget1 
connect split2.Widget main.Widget2 

set split2.Orientation H
connect s2.Widget split2.Widget1 
connect s3.Widget split2.Widget2

print s1=$s1.Out$\n
print s2=$s2.Out$\n
print s3=$s3.Out$\n

exec main