2

我想制作一个具有获取/设置功能的自定义面板（连续 12 个复选框）。我对代理很陌生，跷跷板网格面板已经是代理，所以我如何添加（子类）我自己的构造函数和其他函数？

更具体地说，我想做这样的事情

(vertical-panel :items [
   (text "")
   (month-boxes :id :mboxes :months #{1 2 6 7})])

(let [months (value (select XXX [:#mboxes]))] ...)
4

0 回答 0