Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Changing font
Message
From
26/11/2014 17:50:08
 
 
To
25/11/2014 16:52:06
Dragan Nedeljkovich (Online)
Now officially retired
Zrenjanin, Serbia
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Title:
Environment versions
Visual FoxPro:
VFP 9 SP2
OS:
Windows Server 2012
Network:
Windows 2008 Server
Database:
MS SQL Server
Application:
Web
Miscellaneous
Thread ID:
01611319
Message ID:
01611479
Views:
74
it works perfectly for me -- what's not to like !!??? Brilliant. Thanks Dragan. NIce little work around solution.

k

>Here... you may not like it, but it works. Create a little setfont.prg and keep it in your path:
>
LPARAMETERS lcName, lnSize, lcStyle
>*[2014/11/25 22:49] nDragan - the quick and dirty way to switch font in the middle of something.
>* dirty, as screen font properties aren't reset.
>
>IF !empty(lcName)
>	_screen.FontName=lcName
>ENDIF
>
>IF !empty(lnSize)
>	_screen.FontSize=lnSize
>ENDIF
>
>lcStyle=upper(evl(lcStyle, ""))
>
>_screen.FontBold="B"$lcstyle
>
>_screen.FontItalic="I"$lcStyle
>
>RETURN ""
>
>Then your command becomes
>
?setfont("Georgia",12, "")+"Part one", setfont("Tahoma",16, "I")+" Part two."
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform