Hello,
can a say be painted vertically.
Best regards,
Otto
Hello,
can a say be painted vertically.
Best regards,
Otto
Hello Cristobal,
thank you for your help.
This is working fine.
Best regards,
Otto
function SayTest
local oDlg, oSay, oFont
DEFINE FONT oFont NAME "Segoe UI" SIZE 0,-40 NESCAPEMENT 900
DEFINE DIALOG oDlg SIZE 600,700 PIXEL TRUEPIXEL
ACTIVATE DIALOG oDlg CENTERED ;
ON PAINT ( oDlg:SayText( "Vertical Text" + CRLF + "Second Line", ;
{ 20,20,300, 120 }, nil, oFont ), ;
oDlg:Box( 20, 20, 300, 120 ) )
RELEASE FONT ofont
return nilExcellent mister Rao.
Regards