Possible, to change fonts in Buttonbar (2007) ?

Board index FiveWin for Harbour/xHarbour Possible, to change fonts in Buttonbar (2007) ?

Posts: 4043

Joined: Wed Dec 19, 2007 06:40 PM

Possible, to change fonts in Buttonbar (2007) ?
Posted: Thu Mar 27, 2008 06:39 PM

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

Since 1995 ( the first release of FW 1.9 )

i work with FW.

If you have any questions about special functions, maybe i can help.

Antonio Linares

Posts: 44158

Joined: Thu Oct 06, 2005 05:47 PM

Possible, to change fonts in Buttonbar (2007) ?
Posted: Fri Mar 28, 2008 10:08 AM

Uwe,

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

regards, saludos

Antonio Linares
www.fivetechsoft.com

ukoenig

Posts: 4043

Joined: Wed Dec 19, 2007 06:40 PM

Change font in Buttonbar
Posted: Fri Mar 28, 2008 10:58 AM

Antonio,

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

Code: Select all Collapse

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]

Since 1995 ( the first release of FW 1.9 )

i work with FW.

If you have any questions about special functions, maybe i can help.

FiveTech Support Forums

Continue the discussion