description "Demo of the box BasicImageApplication : creates an interactive image thresholding application" author "laurent.guigues@creatis.insa-lyon.fr" category "example" ## THE APPLICATION BOX include wxvtk/boxes/bbBasicImageApplication new BasicImageApplication appli set appli.WinTitle "ExampleBasicImageApplication" ## THE FILTER new BinaryThresholdImageFilter filter connect appli.AlgorithmInput filter.In connect filter.Out appli.AlgorithmOutput ## THE WINDOW FOR PARAMETERS TUNING new LayoutLine parametersWindow new Slider upperThresholdSlider set upperThresholdSlider.Title "upper threshold" set upperThresholdSlider.In 100 new Slider lowerThresholdSlider set lowerThresholdSlider.Title "lower threshold" set lowerThresholdSlider.In 0 connect lowerThresholdSlider.Widget parametersWindow.Widget1 connect upperThresholdSlider.Widget parametersWindow.Widget2 connect upperThresholdSlider.Out filter.UpperThreshold connect lowerThresholdSlider.Out filter.LowerThreshold connect parametersWindow.Widget appli.ParametersWidget set appli.ParametersWindowHeight 200 set appli.ParametersWindowWidth 400 #set appli.Refresh Reactive #message Process 3 ## GO ! #message All 9 #graph #message Wx 9 exec appli #graph