Even a tiny bitmap will make the button vertically stretchy, but it weirdly makes the button bigger.<div>add this to my last test</div><div><br><div>(new button% </div><div>     [label (list (make-bitmap 1 1) "stretchy" 'left )]</div><div>     [parent frame]</div><div>     (stretchable-width #t)</div><div>     (stretchable-height #t)</div><div>     (callback</div><div>      (lambda (button event)</div><div>        (printf "stretchy"))))</div><div><br></div><div>Stephen</div></div><div><br></div><br><div class="gmail_quote">On Wed Dec 03 2014 at 3:45:54 PM Stephen De Gabrielle <<a href="mailto:spdegabrielle@gmail.com">spdegabrielle@gmail.com</a>> wrote:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">I've worked out it only happens when you have a single line of text- two lines stretch fine, bitmap stretch fine too<br><div><br></div><div>---</div><div><br></div><div></div><div><div>#lang racket/gui</div><div><br></div><div>;;; The top-level frame</div><div>(define frame</div><div>  (instantiate frame%</div><div>    ("Test")))</div><div><br></div><div>(new button% </div></div><div><div>     [label (send /paste in an image/ get-bitmap)]</div></div><div><div>     [parent frame]</div><div>     (stretchable-width #t)</div><div>     (stretchable-height #t)</div></div><div><div>     (callback</div><div>      (lambda (button event)</div><div>        (printf "doesnt stretch vertically:("))))</div></div><div><div>(new button% </div><div>     [label (send <span style="font-size:13.3333339691162px">/paste in an image/</span> get-bitmap)]</div><div>     [parent frame]</div><div>     (stretchable-width #f)</div><div>     (stretchable-height #f)</div></div><div><div>     (callback</div><div>      (lambda (button event)</div><div>        (printf "doesnt stretch vertically:("))))</div><div><br></div></div><div><div>(new button% </div><div>     [label "doesn't stretch vertically "]</div></div><div><div>     [parent frame]</div><div>     (stretchable-width #t)</div><div>     (stretchable-height #t)</div></div><div><div>     (callback</div><div>      (lambda (button event)</div><div>        (printf "doesn't stretch vertically:("))))</div><div><br></div><div>(new button% </div><div>     [label "stretchy</div></div><div><div>"]</div><div>     [parent frame]</div><div>     (stretchable-width #t)</div><div>     (stretchable-height #t)</div></div><div><div>     (callback</div><div>      (lambda (button event)</div><div>        (printf "stretchy"))))</div></div><div><div><br></div><div>;;; Show the top-level frame.</div><div>(send frame show #t)</div></div><div><br></div><div><br></div><br><div class="gmail_quote">On Wed Dec 03 2014 at 3:42:24 PM Jens Axel Søgaard <<a href="mailto:jensaxel@soegaard.net" target="_blank">jensaxel@soegaard.net</a>> wrote:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">> Is anyone else getting this bug?<br>
Yes<br>
<br>
2014-12-03 15:59 GMT+01:00 Stephen De Gabrielle <<a href="mailto:spdegabrielle@gmail.com" target="_blank">spdegabrielle@gmail.com</a>>:<br>
> Is anyone else getting this bug?<br>
><br>
> On OS X buttons stretch horizontally, but not vertically<br>
><br>
> Cheers,<br>
> Stephen<br>
><br>
> Test<br>
> #lang racket/gui<br>
><br>
> ;;; The top-level frame<br>
> (define frame<br>
>   (instantiate frame%<br>
>     ("Test")))<br>
><br>
> (new button%<br>
>      [label "Stretchy Button  :)"]<br>
>      [parent frame]<br>
>      (stretchable-width #t)<br>
>      (stretchable-height #t)<br>
>      [min-height 300]<br>
>      (callback<br>
>       (lambda (button event)<br>
>         (printf "doesnt stretch vertically:("))))<br>
><br>
> ;;; Show the top-level frame.<br>
> (send frame show #t)<br>
><br>
> ---------- Forwarded message ---------<br>
> From: <<a href="mailto:bugs@racket-lang.org" target="_blank">bugs@racket-lang.org</a>><br>
> Date: Mon, 1 Dec 2014 at 23:20<br>
> Subject: Re: [racket-bug] all/14865: Instances of button% don't not respond<br>
> to (stretchable-height #t) and [min-height 300].<br>
> To: <<a href="mailto:spdegabrielle@gmail.com" target="_blank">spdegabrielle@gmail.com</a>><br>
><br>
><br>
> Thank you very much for your problem report.<br>
> It has the internal identification `all/14865'.<br>
> You can check on the status of your problem report at<br>
>   <a href="http://bugs.racket-lang.org/query/?cmd=view&pr=14865" target="_blank">http://bugs.racket-lang.org/<u></u>q<u></u>uery/?cmd=view&pr=14865</a><br>
><br>
> If you wish to provide further information regarding this problem<br>
> you can do so as a reply to this message.  (But please make sure<br>
> that your mailer replies to both "bugs" and "bug-notification".)<br>
><br>
><br>
> ____________________<br>
>   Racket Users list:<br>
>   <a href="http://lists.racket-lang.org/users" target="_blank">http://lists.racket-lang.org/<u></u><u></u>users</a><br>
><br>
<br>
<br>
<br>
--<br>
--<br>
Jens Axel Søgaard<br>
</blockquote></div></blockquote></div>