You need to use a TrueType font. MS Sans Serif is not a true type font.


>There is a bug with Page Caption Orientation when using Tab Orientation set to 2-Left and changing the FontName of the Page. Here is code to reproduce the problem.
>
>

>SET DEFAULT TO "c:\infodigger\sample code\"
>loForm = CREATEOBJECT("Bug")
>loForm.SHOW()
>READ EVENTS
>
>DEFINE CLASS bug AS FORM
>
>  TOP = 0
>  LEFT = 0
>  HEIGHT = 260
>  WIDTH = 470
>  DOCREATE = .T.
>  CAPTION = "PageFrame TabOrientation Bug"
>  NAME = "Bug"
>
>  ADD OBJECT pgfline AS interface_pageframe WITH ;
>    ERASEPAGE = .T., ;
>    PAGECOUNT = 3, ;
>    TOP = 3, ;
>    LEFT = 3, ;
>    WIDTH = 425, ;
>    HEIGHT = 250, ;
>    TABORIENTATION = 2, ;
>    NAME = "pgfLine", ;
>    Interface_page1.CAPTION = "New", ;
>    Interface_page1.NAME = "pgNew", ;
>    Interface_page2.CAPTION = "Current", ;
>    Interface_page2.NAME = "pgCurrent", ;
>    Interface_page3.CAPTION = "History", ;
>    Interface_page3.NAME = "pgHistory"
>
>  PROCEDURE QUERYUNLOAD
>  CLEAR EVENTS
>  ENDPROC
>
>ENDDEFINE
>
>DEFINE CLASS interface_pageframe AS PAGEFRAME
>
>  ERASEPAGE = .T.
>  MEMBERCLASSLIBRARY = "pageframe_taborientation_bug.prg"
>  MEMBERCLASS = "Interface_Page"
>  NAME = "interface_pageframe"
>
>ENDDEFINE
>
>DEFINE CLASS Interface_Page AS PAGE
>* Comment out the FontName and the page's Caption orientation is correct
>  FONTNAME = "MS Sans Serif"
>  FONTSIZE = 8
>  OLEDROPMODE = 2
>ENDDEFINE
>