Example of a re-com form with re-frame's dispatch about re-com HOT 2 CLOSED

(defn wired-textbox [{:keys [label key]}]
  (let [model (subscribe [::input key])]
    (fn []
      [rc/v-box
       :children
       [[rc/label :label label]
        [rc/input-text
         :model (or @model "")
         :on-change #(dispatch [::input-changed key %])]]])))

(defn wired-radiogroup [{:keys [label key options]}]
  (let [model (subscribe [::input key])]
    (fn []
      [rc/v-box
       :children
       [[rc/label :label label]
        [rc/v-box
         :gap "10px"
         :children
         [(doall (for [[c label] options]
                   ^{:key c}
                   [rc/radio-button
                    :label label
                    :value c
                    :model model
                    :label-style (if (= c @model) {:font-weight "bold"})
                    :on-change #(dispatch [::input-changed key c])]))]]]])))

[wired-textbox {:label "Address" :key :address}]
[wired-radiogroup {:label "Color"
                          :key :color
                          :options [[:blue "Blue"] [:red "Red"]]}]