Discussion :

[Thom@s]

Bonjour,

Je créé des programme CGI en Delphi. Lorsque j'utilise des champs de saisie, les caractères accentués en particulier sont transmis au CGI sous la forme %XX. Par exemple si j'ai un champ de saisie ou je tape Héléne je récupére H%E9l%E9ne dans ma "query string".

Existe-t'il des fonctions sous delphi pour reconvertir cette chaîne dans sa forme initiale?

Merci

[portu]

en gros , ce sont les accents qui posent problèmes ?

[Thom@s]

Les accents et certains caractères: espace, &, ... .

Il s'agit à mon avis d'une conversione ne unicode ... à voir.

[Bestiol]

Je ne pense pas qu'il y ait de fonction qui te permette de faire ça directement ...

Toutefois, ce n'est pas bien compliqué de la faire toi-même !

Tu fais une boucle qui tourne tant qu'il y a un signe % dans ta chaine. Tu trouves chaque '%' avec PosEx (L'intérêt est que tu peux choisir d'où tu démarres la recherche du caractère), puis tu prends les deux caractères qui suivent (il y en aura toujours deux). Tu les convertis en integer et récupère le caractère correspondant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Key := StrToInt('$' + Char1 + Char2);
Char3 := Chr(Key);

Ensuite tu remplaces le '%XX' par le bon caractère !
A mon avis, il faut que tu travailles dans un buffer à part plutôt que de remplacer dans la chaine originale. Car si dans ta chaine tu as un '%' qui apparait après "décodage", tu auras soit une erreur de conversion, soit des conversions qui ne devraient pas être faites !

Vala je pense que ça devrait fonctionner !

Bonne prog' !
Bestiol.

[Thom@s]

Ca veut dire que je connais le code de tous les caractères possibles...

[Bestiol]

euh s'cuse moi, mais je comprend pas ta réponse...

[Thom@s]

C'est moi qui n'avait pas compris, je pensais qu'il fallait connître la le code de chaque caractère, je vais tester

[Thom@s]

Ok super ça marche nickel chrome.

Merci

[Bestiol]

hé hé pas de quoi !

Bonne continuation !
Bestiol.

[Reisubar]

Indy propose des procédures pour cet usage, dans IdURI :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
TIdURI.PathEncode(const ASrc: string): string;
TIdURI.URLEncode(const ASrc: string): string;

[Thom@s]

Encore mieux

Merci