Lisp HUG Maillist Archive

Setting bigger font for a button

When I set a large font for a button, I get a picture where text is scaled, button's width scaled, but height is not:
 
 
Here is an example code:
 
(capi:contain
 (make-instance
  'capi:button
  :text "Just example"
  :font (gp:make-font-description :family "courier"
                                  :weight :medium
                                  :slant :roman
                                  :size 100)))
 
How to change the font properly?
 
Why this does not work out of the box?
-- 
Alexander Artemenko
 

Re: Setting bigger font for a button

I think buttons on macOS cannot change height.

Try adding :visible-max-height nil – the CAPI pane now gets enough height to contain the text, but the actual OS button element is still not bigger than before.



> 28 nov. 2020 kl. 10:09 skrev Артеменко Александр <sasha@svetlyak.ru>:
> 
> When I set a large font for a button, I get a picture where text is scaled, button's width scaled, but height is not:
>  
> <Screenshot 2020-11-28 at 11.53.58.png>
>  
> Here is an example code:
>  
> (capi:contain
>  (make-instance
>   'capi:button
>   :text "Just example"
>   :font (gp:make-font-description :family "courier"
>                                   :weight :medium
>                                   :slant :roman
>                                   :size 100)))
>  
> How to change the font properly?
>  
> Why this does not work out of the box?
> -- 
> Alexander Artemenko
>  


_______________________________________________
Lisp Hug - the mailing list for LispWorks users
lisp-hug@lispworks.com
http://www.lispworks.com/support/lisp-hug.html

Updated at: 2020-12-10 08:28 UTC