>From a quick glance at the push-button-pane code, it looks like Mariano's suggestion of using x-spacing / y-spacing may work. If not, an alternative is to define a subclass of push-button-pane with a new compose-space method.<br>
<br><div class="gmail_quote">On Wed, Mar 27, 2013 at 8:22 AM, Irčne Durand <span dir="ltr"><<a href="mailto:idurand@labri.fr" target="_blank">idurand@labri.fr</a>></span> wrote:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
Hello,<br>
<br>
In order to give a project to my students using McClim for the graphical<br>
interface, I am trying to make a square button of a given size.<br>
<br>
But I always obtain a default size button the width, height, max-width, ...<br>
have no effect.<br>
<br>
Where could I find some help about that?<br>
<br>
Thank you,<br>
Irčne<br>
<br>
(defun make-square-pane ()<br>
(make-pane<br>
'square-button-pane<br>
:label ""<br>
:width 20<br>
:height 20<br>
:activate-callback (lambda (x)<br>
(setf (gadget-label x) "O"))))<br>
<br>
<br>
<br>_______________________________________________<br>
mcclim-devel mailing list<br>
<a href="mailto:mcclim-devel@common-lisp.net">mcclim-devel@common-lisp.net</a><br>
<a href="http://lists.common-lisp.net/cgi-bin/mailman/listinfo/mcclim-devel" target="_blank">http://lists.common-lisp.net/cgi-bin/mailman/listinfo/mcclim-devel</a><br>
<br></blockquote></div><br>