Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Changing font
Message
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:
01611480
Vues:
42
oops - hold on - can't seem to get this work as a menu prompt in popup. works perfectly in single line state.

>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