Font rotate problems
Posted: Tue May 13, 2025 9:54 am
I not understood how rotate a font
please try this test
I tried also with oFont:rotate(number)
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