Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Changing font
Message
 
À
25/11/2014 16:52:06
Dragan Nedeljkovich (En ligne)
Now officially retired
Zrenjanin, Serbia
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Titre:
Versions des environnements
Visual FoxPro:
VFP 9 SP2
OS:
Windows Server 2012
Network:
Windows 2008 Server
Database:
MS SQL Server
Application:
Web
Divers
Thread ID:
01611319
Message ID:
01611479
Vues:
72
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."
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform