Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Converting foreign accents
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
Visual FoxExpress
Divers
Thread ID:
01648083
Message ID:
01648107
Vues:
57
*!*chrtran() vfp function replaces each character in a character expression that matches a character in a 
*!*	second character expression   with the corresponding character in a third character expression.
*!*syntaxe: CHRTRAN(cSearchedExpression, cSearchExpression, cReplacementExpression)
*!*	 

local m.myvar
text to m.myvar noshow  &&this is a french text with acents,^,...specific chars (from http://www.lorem-accents.com/)
Tellus donec pulvîar fancibüs à classé pésuéré arcu mattis, aliquét alèquam habitant juséo convallis tùrpus néc, 
adipiscing enim !
énis nostra fuscé. Fringlilia vestibulum sed famès nostré morbi mattis ut, cubliâ classé curae metus conubia 
cél litoré, primis donéc dictum aliquet pulvîar et orci interdum.
endtext
messagebox(m.myvar,0+32+4096,"first string version")
local mynewVar
m.myNewvar=CHRTRAN(m.myvar, "ÀÁÂÃÄÅÇÈÉÊËÌÍÎÏÐÑÒÓÔÕÖÙÚÛÜÝàáâãäåçèéêëìíîïðñòóôõöùúûüýÿ","AAAAAACEEEEIIIIDNOOOOOUUUUYaaaaaaceeeeiiiidnooooouuuuyy")

messagebox(m.myNewvar,0+32+4096,"in clipboard")  &&can paste anywhere from the clipboard and see there is no specific french letters
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform