X-Git-Url: https://git.creatis.insa-lyon.fr/pubgit/?a=blobdiff_plain;f=packages%2Fwx%2Fbbs%2Fappli%2FwxTour.bbs;h=03f12152f44add2d7e6d31f7c4c87d0ecfa32434;hb=b0b3d38965ae5ea063f4506a6b96ad341da66f10;hp=3f27202c769249c24a5436af109a764e774bd3a1;hpb=fb65ef0feb38b84723ea928ec3d3c056ba26274e;p=bbtk.git diff --git a/packages/wx/bbs/appli/wxTour.bbs b/packages/wx/bbs/appli/wxTour.bbs index 3f27202..03f1215 100644 --- a/packages/wx/bbs/appli/wxTour.bbs +++ b/packages/wx/bbs/appli/wxTour.bbs @@ -7,6 +7,9 @@ include wx print " " print "============================" print "A Slider whose output is plugged into an OutputText" +print "============================" +print " " +#================================================================== message echo 2 # Create the Slider @@ -17,15 +20,15 @@ set slider.ReactiveOnTrack 1 new OutputText text # Add the Layout new LayoutLine main -# Make it a Dialog +# Make it a Dialog set main.WinDialog true -# Setting up the Layout : +# Setting up the Layout connect slider.Widget main.Widget1 connect text.Widget main.Widget2 -# The output of the slider is plugged into the input of the text -# To do this, we must have an int to string adaptor, hence load std +#The output of the slider is plugged into the input of the text +#To do this, we must have an int to string adaptor, hence load std load std connect slider.Out text.In @@ -41,11 +44,18 @@ clear print " " print "============================" print "Splitting a window into two adjustable parts" +print "============================" +print " " #================================================================== message echo 2 new LayoutSplit main - +new Slider slider1 +new Slider slider2 +connect slider1.Widget main.Widget1 +connect slider2.Widget main.Widget2 +set main.Proportion 75 +set main.Orientation Horizontal set main.WinDialog true exec main