topic-128

Posts: 142

Joined: Sun Oct 09, 2005 10:59 AM

Using fonts
Posted: Fri Oct 14, 2005 06:21 AM

Hello,

I try to define 3 sizes of fonts :

DEFINE FONT Fnt[1] NAME "MS Sans Serif" SIZE 9 , 12
DEFINE FONT Fnt[2] NAME "MS Sans Serif" SIZE 0 , 10
DEFINE FONT Fnt[3] NAME "MS Sans Serif" SIZE 0 , 8
DEFINE DIALOG oDlg
@ 1 , 1 SAY "SIZE 12" OF oDlg FONT Fnt[1]
@ 1 , 5 SAY "SIZE 10" OF oDlg FONT Fnt[2]
@ 1 , 7 SAY "SIZE 8" OF oDlg FONT Fnt[3]

Making a test , i can see difference between size 12 , and size 10 , NOT between size 10 and size 8

Is Size 8 not available with MS Sans Serif ?
Maybe another font ?

Frank

Detlef Hoefner

Posts: 312

Joined: Sat Oct 08, 2005 09:12 AM

Using fonts
Posted: Sat Oct 15, 2005 11:01 AM

Frank,

you are right.
With Arial font the example shows different sizes 10 and 8.
With Sans serif not.

Code: Select all Collapse

#include  "fivewin.ch"

///////////////
FUNCTION Main()
///////////////
LOCAL aFont := array( 3 )
LOCAL oDlg


   DEFINE FONT aFont[ 1 ] NAME "Arial" SIZE 0 , -12 
   DEFINE FONT aFont[ 2 ] NAME "Arial" SIZE 0 , -10 
   DEFINE FONT aFont[ 3 ] NAME "Arial" SIZE 5 ,  -8 
   
   DEFINE DIALOG oDlg 

   @ 1 , 10 SAY "SIZE 12" OF oDlg FONT aFont[ 1 ] 
   @ 2 , 10 SAY "SIZE 10" OF oDlg FONT aFont[ 2 ] 
   @ 3 , 10 SAY "SIZE 8"  OF oDlg FONT aFont[ 3 ] 

   ACTIVATE DIALOG oDlg

RETURN( NIL )

Regards,
Detlef

FiveTech Support Forums

Continue the discussion