Discussion :

[Papy214]

Bonjour tou(te)s

Je suis en train de prendre le chou avec System.NetEncoding.TBase64Encoding.

Côté client, je crée un objet JSON dans lequel je mets un TJSONArray contenant des fichiers.
Chaque élément contient le nom et les données encodées en base64 avec System.NetEncoding.TBase64Encoding.
Tout semble bien se passer.

J'envoie le JSON à mon serveur et làaussi, tout va bien. Les données sont les mêmes au départ et à l'arrivée.

Sauf que, quand je veux décoder le base64 pour recréer mon fichier, je me ramasse:

---------------------------
Notification des exceptions du débogueur
---------------------------
Le projet TrucmucheServer.exe a déclenché la classe d'exception EEncodingError avec le message 'Aucun mappage pour le caractère Unicode n'existe dans la page de code multi-octet cible'.
---------------------------
Arrêter Continuer Aide
---------------------------

J'encode et décode avec le même système des 2 cotés.
J'ai tenté d'utiliser des string puis des ansistring mais le résultat est le même.

Est-ce que vous pouvez me conseiller une autre unité cachée pour faire un base64 ?

Papy !

[foetus]

J'ai vu cette erreur sur Internet la dernière fois en cherchant "je ne sais plus quoi"

Results of DecodeBase64 only 1 Byte on Android?

Base64 encodes binary to text. And decoding decodes text to binary. So, starting with a string you need to encode the text to binary using some well defined text encoding. For instance:

Code :

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

1
2
3
4
var
  bytes: TBytes;
....
bytes := TEncoding.UTF8.GetBytes(str);

Now you can base64 encode bytes which is binary as required.

In the reverse direction, decoding the base64 encoded text yields a byte array representing UTF-8 encoded text. Decode that like so:

Code :

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

str := TEncoding.UTF8.GetString(bytes);

In XE7 you should not use Soap.EncdDecd. Instead use System.NetEncoding.TNetEncoding. Call TNetEncoding.Base64.EncodeBytesToString to encode as base64 and TNetEncoding.Base64.DecodeStringToBytes to decode.

To encode:

Code :

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

1
2
bytes := TEncoding.UTF8.GetBytes(str);
base64 := TNetEncoding.Base64.EncodeBytesToString(bytes);

To decode:

Code :

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

1
2
bytes := TNetEncoding.Base64.DecodeStringToBytes(base64);
str := TEncoding.UTF8.GetString(bytes);

The key message is the base64 encodes binary to text. That is often misunderstood.

[Papy214]

Avec un peu (beaucoup) de retard, merci !
Je mélangeais 2 techniques (Soap.EncdDecd et TEncoding) pour cause de versions différentes entre client et serveur et apparemment, c'est bien ça qui coinçait.

Bonne année