Contents

module Override
  def self.extended mod
    def mod.list_box args = {}
      l, t, w, h = args[:left], args[:top], args[:width], 20
      w ||= 200
      bcolor = rgb(123, 158, 189)
      selected, fimg, bimg = [], nil, nil
        
      f = flow :left => l, :top => t, :width => w, :height => h do
        border bcolor
        selected[0] = inscription
        fimg = image "#{DIR}/static/listbox_button1.png", :left => w-17, :top => 2
        bimg = image("#{DIR}/static/listbox_button2.png", :left => w-17, :top => 2).hide
        fimg.hover{bimg.show}
        bimg.leave{bimg.hide}
        bimg.click{bimg.show}
      end
      
      rects, inscs = [], []
      args[:items].length.times do |i|
        x, y = l, t+(i+1)*h
        r = rect(x, y, w-1, h, :stroke => bcolor, :fill => white).hide
        s = inscription(args[:items][i], :left => x, :top => y).hide
        r.hover{r.style :fill => blue}
        r.leave{r.style :fill => white}
        r.click{selected[0].text = s.text; selected[1] = r}
        rects << r
        inscs << s
      end
      
      f.click do
        rects.each{|r| r.toggle; r.style(:fill => blue) if r == selected[1]}
        inscs.each{|i| i.toggle}
      end
    end
  end
end

Version data entries

6 entries across 6 versions & 1 rubygems

Version	Path
shoesgem-0.1480.0	shoes/lib/shoes/override.rb
shoesgem-0.1469.0	shoes/lib/shoes/override.rb
shoesgem-0.1430.0	shoes/lib/shoes/override.rb
shoesgem-0.1429.0	shoes/lib/shoes/override.rb
shoesgem-0.1428.0	shoes/lib/shoes/override.rb
shoesgem-0.1426.0	shoes/lib/shoes/override.rb