Все опции для combobox в clojure/sawaw

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))) 

Кроме того, они по-прежнему свинг элементы мы работаем с, так что в конце концов, мы можем также сделать:

(.setSelectedIndex combo 2)