ATOUTFOX
COMMUNAUTÉ FRANCOPHONE DES PROFESSIONNELS FOXPRO
Visual FoxPro : le développement durable

Utilisation de GetLocaleInfo et GetLocaleInfoEx pour les monnaies   



L'auteur

Vilhelm-Ion Praisach
Roumanie Roumanie
Membre Simple
# 0000004149
enregistré le 09/01/2015

http://praisachion.blogspot.ro
Praisach Vilhelm-Ion
Fiche personnelle


Note des membres
pas de note

Contributions > 05 - API et appels systèmes

Utilisation de GetLocaleInfo et GetLocaleInfoEx pour les monnaies
# 0000000900
ajouté le 14/06/2015 10:16:32 et modifié le 15/06/2015
consulté 10089 fois
Niveau initié

Version(s) Foxpro :
VFP 9.0

Description
GetLocaleInfo et GetLocaleInfoEx peuvent être utilisés pour obtenir les paramètres locaux pour les monnaies (ceux du Panneau de configuration -> Paramètres régionaux)

Les deux GetLocaleInfo et GetLocaleInfoEx donne beaucoup d'informations. Ils peuvent être invoqués de façon similaire, et donne des résultats similaires.
La principale différence entre la signature de fonctions, est le premier paramètre. GetLocaleInfo ont un paramètre LONG, tandis que GetLocaleInfoEx un paramètre CHARACTER.

GetLocaleInfo peut être utilisé dans Windows XP, Vista et ci-dessus. GetLocaleInfo tend à devenir obsolète.
GetLocaleInfoEx peut être utilisé dans Windows Vista et ci-dessus, mais ne peut pas être utilisé dans Windows XP.
GetLocaleInfo fournir des résultats ASCII, tandis que GetLocaleInfoEx prend en charge Unicode.
Cela signifie beaucoup de devises (comme English India) peuvent être obtenus qu'avec GetLocaleInfoEx.

Pour obtenir les valeur défaut, le premier parametre de GetLocaleInfoEx doit etre Null.
Pour autre valeurs, utilisez -, mais convertir aux Unicode
Par examples
STRCONV("en-AU",5)+CHR(0)
ou
STRCONV("fr-FR",5)+CHR(0)

L'information donnée par GetLocaleInfo et GetLocaleInfoEx, peut être utilisé pour écrire un document HTML, ou pour écrire les nombres formatés dans Word, grâce à l'automatisation.

Je l'ai utilisé pour la version mise à jour du copytoxlsx
http://www.atoutfox.com/articles.asp?ACTION=FCONSULTER&ID=0000000888

Plus d'exemples
http://praisachion.blogspot.ro/2015/06/using-getlocaleinfo-and-getlocaleinfoex.html
http://praisachion.blogspot.ro/2015/06/using-getlocaleinfo-and-getlocaleinfoex_14.html
http://praisachion.blogspot.ro/2015/06/using-getlocaleinfo-and-getlocaleinfoex_79.html
J'ai essayé une explication plus détaillée, ici
http://www.foxite.com/archives/getlocaleinfoex-fountain-of-knowledge-0000424218.htm
Code source :
Declare INTEGER GetLocaleInfoEx in Win32API String Locale, LONG LCType, STRING @LpLCData, INTEGER cchData

LOCAL LpLCData,cchData,nretval,LPCWSTR
LpLCData = space(255)
cchData = LEN(LpLCData)
nretval = 0

LPCWSTR = Null
nretval = GetLocaleInfoEx(LPCWSTR, 0x14, @LpLCData, cchData)
?nretval,LpLCData,TRANSFORM(ASC(SUBSTR(LpLCData,2)),"@0"),TRANSFORM(ASC(LpLCData),"@0"&& Euro (Unicode 0x20 0x0AC)

LPCWSTR = STRCONV("en-GB",5)+CHR(0)
nretval = GetLocaleInfoEx(LPCWSTR, 0x14, @LpLCData, cchData)
?nretval,LpLCData,TRANSFORM(ASC(SUBSTR(LpLCData,2)),"@0"),TRANSFORM(ASC(LpLCData),"@0"&& pounds (Unicode 0x000 0x0A3 ou ASCII 0xA3)

LPCWSTR = STRCONV("ro-RO",5)+CHR(0)
nretval = GetLocaleInfoEx(LPCWSTR, 0x2A, @LpLCData, cchData)
?'lundi à roumain',nretval,STRCONV(LEFT(LpLCData, 2*(nretval - 1)),6)
Commentaires
le 14/06/2015, eddymaue a écrit :
il manque un p'tit de code

bonne journée

le 14/06/2015, Vilhelm-Ion Praisach a écrit :
Je crois que les nombre de lignes été limitée.
S'il vous plaît cliquer sur les liens


Publicité

Les pubs en cours :

www.atoutfox.org - Site de la Communauté Francophone des Professionnels FoxPro - v3.4.0 - © 2004-2024.
Cette page est générée par un composant COM+ développé en Visual FoxPro 9.0-SP2-HF3