Hello,

In order to give a project to my students using McClim for the graphical
interface, I am trying to make a square button of a given size.

But I always obtain a default size button the width, height, max-width, ...
have no effect.

Where could I find some help about that?

Thank you,
Irène

(defun make-square-pane ()
  (make-pane
   'square-button-pane
   :label ""
   :width 20
   :height 20
   :activate-callback (lambda (x)
            (setf (gadget-label x) "O"))))

_______________________________________________
mcclim-devel mailing list
mcclim-devel@common-lisp.net
http://lists.common-lisp.net/cgi-bin/mailman/listinfo/mcclim-devel