From idurand at labri.fr  Wed Mar 27 12:22:19 2013
From: idurand at labri.fr (=?ISO-8859-1?Q?Ir=E8ne_Durand?=)
Date: Wed, 27 Mar 2013 13:22:19 +0100
Subject: [mcclim-devel] button size
In-Reply-To: <492A8051.6060901@labri.fr>
References: <20080331170353.C3F004E024@common-lisp.net>
	<47F20740.5070401@labri.fr> <492A8051.6060901@labri.fr>
Message-ID: <5152E47B.1080400@labri.fr>

  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"))))


-------------- next part --------------
A non-text attachment was scrubbed...
Name: square-button.lisp
Type: application/x-extension-lisp
Size: 846 bytes
Desc: not available
URL: <https://mailman.common-lisp.net/pipermail/mcclim-devel/attachments/20130327/1db3c602/attachment.bin>

From marianomontone at gmail.com  Wed Mar 27 13:05:48 2013
From: marianomontone at gmail.com (Mariano Montone)
Date: Wed, 27 Mar 2013 10:05:48 -0300
Subject: [mcclim-devel] button size
In-Reply-To: <5152E47B.1080400@labri.fr>
References: <20080331170353.C3F004E024@common-lisp.net>
	<47F20740.5070401@labri.fr> <492A8051.6060901@labri.fr>
	<5152E47B.1080400@labri.fr>
Message-ID: <5152EEAC.7040909@gmail.com>

Hi.

Did you try with :x-spacing and :y-spacing instead of :width and :height
to see what happens?

Mariano

El 27/03/13 09:22, Ir?ne Durand escribi?:
>  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 at common-lisp.net
> http://lists.common-lisp.net/cgi-bin/mailman/listinfo/mcclim-devel

-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://mailman.common-lisp.net/pipermail/mcclim-devel/attachments/20130327/5f1511b6/attachment.html>

From ahefner at gmail.com  Wed Mar 27 13:41:47 2013
From: ahefner at gmail.com (Andy Hefner)
Date: Wed, 27 Mar 2013 09:41:47 -0400
Subject: [mcclim-devel] button size
In-Reply-To: <5152E47B.1080400@labri.fr>
References: <20080331170353.C3F004E024@common-lisp.net>
	<47F20740.5070401@labri.fr>
	<492A8051.6060901@labri.fr> <5152E47B.1080400@labri.fr>
Message-ID: <CAO7Kkek70KP1QUcYdcFB+dwMAqbchEQ8v1Mz+0=gxXW1FEU3Dg@mail.gmail.com>

>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.

On Wed, Mar 27, 2013 at 8:22 AM, Ir?ne Durand <idurand at labri.fr> wrote:

>  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 at common-lisp.net
> http://lists.common-lisp.net/cgi-bin/mailman/listinfo/mcclim-devel
>
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://mailman.common-lisp.net/pipermail/mcclim-devel/attachments/20130327/54251b71/attachment.html>

From idurand at labri.fr  Wed Mar 27 19:26:26 2013
From: idurand at labri.fr (=?ISO-8859-1?Q?Ir=E8ne_Durand?=)
Date: Wed, 27 Mar 2013 20:26:26 +0100
Subject: [mcclim-devel] button size
In-Reply-To: <mailman.13.1364410867.12734.mcclim-devel@common-lisp.net>
References: <mailman.13.1364410867.12734.mcclim-devel@common-lisp.net>
Message-ID: <515347E2.6040803@labri.fr>


> ------------------------------
>
> Message: 2
> Date: Wed, 27 Mar 2013 10:05:48 -0300
> From: Mariano Montone<marianomontone at gmail.com>
> To: mcclim-devel at common-lisp.net
> Subject: Re: [mcclim-devel] button size
> Message-ID:<5152EEAC.7040909 at gmail.com>
> Content-Type: text/plain; charset="iso-8859-1"
>
> Hi.
>
> Did you try with :x-spacing and :y-spacing instead of :width and :height
> to see what happens?

I just did. The button is bigger but it is still not a square.
I guess that I will have to try what Andy suggested:
write a new compose-space method :-(

Ir?ne
> Mariano
>
> El 27/03/13 09:22, Ir?ne Durand escribi?:
>>   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 at common-lisp.net
>> http://lists.common-lisp.net/cgi-bin/mailman/listinfo/mcclim-devel
> -------------- next part --------------
> An HTML attachment was scrubbed...
> URL:<http://lists.common-lisp.net/pipermail/mcclim-devel/attachments/20130327/5f1511b6/attachment-0001.html>
>
> ------------------------------
>
> Message: 3
> Date: Wed, 27 Mar 2013 09:41:47 -0400
> From: Andy Hefner<ahefner at gmail.com>
> To: idurand at labri.fr
> Cc: mcclim-devel at common-lisp.net
> Subject: Re: [mcclim-devel] button size
> Message-ID:
> 	<CAO7Kkek70KP1QUcYdcFB+dwMAqbchEQ8v1Mz+0=gxXW1FEU3Dg at mail.gmail.com>
> Content-Type: text/plain; charset="iso-8859-1"
>
> > 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.
>
> On Wed, Mar 27, 2013 at 8:22 AM, Ir?ne Durand<idurand at labri.fr>  wrote:
>
>>   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"))))
>>
>>
>>