This is a bug/limitation: the `font' argument is currently ignored for `tab-panel%' and `group-box-panel%'.
I'll work on this (hopefully soon). Meanwhile, unfortunately, I don't see a workaround. At Mon, 10 Jun 2013 12:23:22 +0200, "Mag. Dr. Nikolaus Klepp" wrote: > Hi! > > I'm having some issue with fonts when creating GUI elements. > > In my understanding, when I pass [font some-font] when creating a new object, > then that object should take that font to render its controls. This works on > button%, but not on other elemts like group-box-panel% or tab-panel%. > > So, how is the correct way to get these objects to use the font I'd like them > to use? > > Nik > > example code: on debian, all labels of tab-panel% and group-box-panel% have > the same font normal-control-font, while button% uses the font I passed on. > > > #lang racket > (require racket/gui) > > (define frame (new frame% [label "TEST"] [width 800] [height 800] [min-width > 100] [min-height 100])) > (new tab-panel% [parent frame] [font tiny-control-font] [choices '(" > tiny-control-font ")]) > (new group-box-panel% [parent frame] [label " normal-control-font "] [font > normal-control-font] ) > (new group-box-panel% [parent frame] [label " tiny-control-font " ] [font > tiny-control-font] ) > (new group-box-panel% [parent frame] [label " custom-font " ] [font > (make-object font% 28 'default)] ) > (new button% [parent frame] [label " tiny-control-font " ] [font > tiny-control-font] ) > (new button% [parent frame] [label " small-control-font " ] [font > small-control-font] ) > (new button% [parent frame] [label " normal-control-font " ] [font > normal-control-font] ) > (new button% [parent frame] [label " custom-font " ] [font > (make-object font% 28 'default)] ) > > (send frame show #t) > -- > > Mag. Dr. Nikolaus Klepp > Einnehmerstraße 14 > A-4810 Gmunden > Tel.: +43 650 82 11 724 > email: off...@klepp.biz > dr.kl...@gmx.at > > > ____________________ > Racket Users list: > http://lists.racket-lang.org/users ____________________ Racket Users list: http://lists.racket-lang.org/users