0.1.0-SNAPSHOT permalink Arrow_down_16x16
  • (button caption & {:as opts})

1 Example top

  • (defn button-example []
      (frame :title "A Button Example"
    	 :layout (FlowLayout.)
    	 :size [220 90]
    	 :show true
    	 [b1 (button "First")
    	  b2 (button "Second")
    	  lab (label "Press a button")]
    	 (add-action-listener b1 ([e] (println "listener called")))))
Log in to add / edit an example.

See Also top

Log in to add a see also.

Plus_12x12 Minus_12x12 Source clj_swing/button.clj:23 top

(defmacro button [caption & {:as opts}]
  `(general-button JButton ~(assoc opts :caption caption)))
Vars in clj-swing.button/button: assoc defmacro concat list seq
Used in 0 other vars

Comments top

No comments for button. Log in to add a comment.