OpenEuphoria

Re: Same font for all controls

• Posted by ghaberek (admin) Jul 19, 2013
• 1364 views

Are you using Win32Lib? (For clarity sake, you should probably specify that each time you start a new topic.)

You'll want to use setCreateFont() before creating your controls.

include Win32Lib.ew 
without warning 
 
setCreateFont( "Tahoma", 10, Normal, Black ) 
 
constant 
    Main        = create( Window, "SetFont Demo", 0, Default, Default, 480, 360, 0 ), 
    LText1      = create( LText, "Tahoma 10pt", Main, 10, 10, 100, 20, 0 ), 
    MleText1    = create( MleText, "Hello, this is a\r\nmulti-line textbox.", Main, 10, 40, 320, 160, 0 ), 
$ 
 
WinMain( Main, Normal ) 

-Greg