description "creaMaracasVisu::ColorBar box example. " category "example" author "eduardo.davila@creatis.insa-lyon.fr" load std load wx load creaMaracasVisu new LayoutSplit s set s.Orientation H new LayoutSplit ss set ss.Orientation H new LayoutLine s1 new LayoutLine s2 set s1.Orientation V set ss.Orientation H set s2.Orientation V new SliderMinMax sliderMM_h set sliderMM_h.Orientation 1 set sliderMM_h.InW 300 set sliderMM_h.InH 90 set sliderMM_h.InMax 350 set sliderMM_h.InMin 0 set sliderMM_h.ShowLabels 1 new SliderMinMax sliderMM_v set sliderMM_v.Orientation 0 set sliderMM_v.InW 300 set sliderMM_v.InH 30 set sliderMM_v.InMax 350 set sliderMM_v.InMin 0 set sliderMM_v.ShowLabels 1 new ColorBar colorB_h set colorB_h.Orientation 1 set colorB_h.InW 300 set colorB_h.InH 50 set colorB_h.InMax 350 set colorB_h.InMin 0 set colorB_h.Reds " 0 255 0 255 220 30" set colorB_h.Greens " 0 220 220 100 240 55" set colorB_h.Blues " 255 0 15 0 0 0" set colorB_h.Values " 0 30 70 130 250 310" new ColorBar colorB_v set colorB_v.Orientation 0 set colorB_v.InW 300 set colorB_v.InH 50 set colorB_v.InMax 350 set colorB_v.InMin 0 set colorB_v.Reds " 0 255 0 255 220 30" set colorB_v.Greens " 0 220 220 100 240 55" set colorB_v.Blues " 255 0 15 0 0 0" set colorB_v.Values " 0 30 70 130 250 310" connect s1.Widget s.Widget1 connect s2.Widget s.Widget2 connect sliderMM_h.Widget s1.Widget1 connect colorB_h.Widget s1.Widget2 connect ss.Widget s2.Widget1 connect sliderMM_v.Widget ss.Widget1 connect colorB_v.Widget ss.Widget2 exec s