Possible, to change fonts in Buttonbar (2007) ?

[ukoenig]

Hello,

I have big buttonbar-buttons and hight screen-resolutions.
The text is hard to read.
I had a look in the classes and could't see any font defines.

Is it possible to change the font-size for buttonbars ?

Regards

Uwe

[Antonio Linares]

Uwe,

Please search for DEFINE FONT oFont NAME "Tahoma" SIZE 0, -11 in Class TBtnBmp and modify it.

[ukoenig]

Antonio,

thank you very much.
As a option, i will make it
in relation of the button-hight

Code: Select all  Expand view

nSIZE := -11
if  ::nHeight >= 100
    nSIZE := -16
endif
if  ::nHeight < 100 .and. ::nHeight >= 80
    nSIZE := -15
endif
if  ::nHeight >= 50 .and. ::nHeight < 80
    nSIZE := -12
endif
if ::oWnd:oFont != nil
    if ::oWnd:oFont:cFaceName != "Tahoma"
       DEFINE FONT oFont NAME "Tahoma" SIZE 0, nSIZE
       ::oWnd:SetFont( oFont )
    endif   
else   
    DEFINE FONT oFont NAME "Tahoma" SIZE 0, nSIZE
    ::oWnd:SetFont( oFont )
endif   


That looks fine

Regards

Uwe [/code]