Font rotate problems

[Silvio.Falconi]

I not understood how rotate a font
please try this test

Code: Select all | Expand

#include "FiveWin.ch"

Function test()
local oDLg
local ctest := " SILVIO "
local oFont

*oFont := TFont():New( "Verdana", 0, -14, , .T.) //90,180,270,900,2700
DEFINE FONT oFont NAME "Arial" SIZE 0, -25 NESCAPEMENT 900

   DEFINE DIALOG oDlg TITLE "Test font" SIZE 400,400 PIXEL TRUEPIXEL

   @ 10,10 say ctest SIZE 40,200 of oDlg PIXEL FONT oFont  BORDER

   ACTIVATE DIALOG oDlg
   

RETURN NIL

I tried also with oFont:rotate(number)