clojure /跷跷板中的组合框的所有选项

Question

所以我按字母顺序创建了一些带有各种元素的组合框。我不希望菜单上的默认选择为最高值;相反，我希望它是最常选择的值。在swing中我可以调用成员函数setSelectedIndex()并简单地传入最受欢迎的菜单值的索引。我怎么能在跷跷板上做到这一点？跷跷板文档说选项是:model和:renderer，但我找不到任何允许我设置默认索引的内容......

我还缺少其他文件吗？

Answer 1

您可以使用的功能selection!：

(defn combotest []
  (let [w (frame :title "Combobox Test" :width 200 :height 80)
        combo (combobox :model ["A" "B" "C"])
        pnl (horizontal-panel :items [combo])]
     (config! w :content pnl)
     (selection! combo "C") ;;  <--- boom ---
     (show! w))) 

此外，这些仍然是我们正在使用的Swing项目，因此在一天结束时，我们也可以这样做：

(.setSelectedIndex combo 2)