Xml et caractères en exposant

Version imprimable

[Resolu]Xml et caractères en exposant

Bonjour

Je suis un débutant en programmation et je rencontre un problème lors de la création d'un fichier xml.
Quand j'essaye de récupérer le texte "™" par exemple, lorsque j'ouvre le xml dans IE, j'ai un symbole à la place (petit rectangle). Lorsque j'ouvre le fichier xml avec le bloc note j'ai le code ™ à la place.

J'ai cherché sur internet, mais j'ai pas trouvé de solution. Quelqu'un peut-il m'aider ?
Merci.

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
procedure TForm1.EcritureCatalogue(Fichier: TTraitement);
Var
Catalog,Properties, movie, Contents : IXMLNode;
begin
If  compteur = 0 then
begin
XMLDoc.Version:='1.0';
XMLDoc.Encoding:='iso-8859-1';
XMLDoc.DocumentElement := XMLDoc.CreateElement('AntMovieCatalog','');
          XMLDoc.DocumentElement.Attributes['Format'] := '35';
          XMLDoc.DocumentElement.Attributes['Version'] := '3.5.1 (2007-09-22)';
          XMLDoc.DocumentElement.Attributes['Date'] := '17/08/2008 17:44:15';
      Catalog:=XMLDoc.DocumentElement.AddChild('Catalog');
          Properties := Catalog.AddChild('Properties');
          Contents := Catalog.AddChild('Contents');
 
end;
compteur:=compteur+1;
movie := XMLDoc.DocumentElement.ChildNodes.FindNode('Catalog').ChildNodes.FindNode('Contents').AddChild('Movie');
 
              movie.Attributes['Number'] :=compteur;
              movie.Attributes['Checked'] :='True';
              movie.Attributes['Date'] := date;
              movie.Attributes['OriginalTitle'] :=Fichier.OriginalTitle;
              movie.Attributes['Length'] :=Fichier.Lengths;
              movie.Attributes['URL'] :=Fichier.URL;
              movie.Attributes['VideoFormat'] :=Fichier.VideoFormat;
              movie.Attributes['VideoBitrate'] :=Fichier.VideoBitrate;
              movie.Attributes['AudioFormat'] :=Fichier.ListeFormatAudio;
              movie.Attributes['AudioBitrate'] :=Fichier.AudioBitrate;
              movie.Attributes['Resolution'] :=Fichier.Resolution;
              movie.Attributes['Framerate'] :=Fichier.Framerate;
              movie.Attributes['Languages'] :=Fichier.ListeLanguagesAudio;
              movie.Attributes['Subtitles'] :=Fichier.ListeLangauagesSousTitre;
              movie.Attributes['Size'] :=Fichier.Size;
ProgressBar1.Position:= ProgressBar1.Position + 1;
fichier.destroy;
end;

30/12/2008, 11h33
ShaiLeTroll

c'est normal, le "™" que tu utilises c'est le code 153 du charset 'window 1252' mais tu encode la page en 'iso-8859-1' où le 153 c'est un caractère de contrôle non imprimable donc un carré

sinon passe à un encodage UTF8 mais ce affichera des combinaisons multicaratères ...
02/01/2009, 16h13
inspecteur rick
Merci de la réponse et désolé du retard (fêtes oblige)

J'ai essayé avec
Code:

1 2 XMLDoc.Version:='1.0'; XMLDoc.Encoding:='UTF-8';
Mais les accents sont remplacés par des trucs bizarres et le "tm" ne passe pas, j'ai "â„¢" à la place

Une autre idée ?
Merci
05/01/2009, 10h49
ShaiLeTroll

Bien sur, c'est un encodage, si tu passe de l'un à l'autre, il faut traduire les caractères ... ça ne se fait pas tout seul !

pourquoi forces-tu l'encoding ? le fichier devrait le contenir !
05/01/2009, 11h23
inspecteur rick

Salut

Traduire les caractères, je veux bien mais comment faut-il s'y prendre ?

Citation:

pourquoi forces-tu l'encoding ? le fichier devrait le contenir !

Ben, j'utilise TXmlDocument et quand j'utilise la procédure SaveToFile je n'ai pas les accents et les lettres en exposant. Mon xml n'a aucune entête.
En rajoutant XMLDoc.Encoding:='iso-8859-1", s'obtient les accents.
05/01/2009, 12h11
ShaiLeTroll

Au fait, il ne faut pas utiliser Destroy mais Free pour libérer un objet ...

Donc tu es en écriture, donc si tu mets

Code:

XMLDoc.Encoding:='UTF-8';

tu auras tes caractères mais notepad ne pourra pas les lire, seul un navigateur comme FireFox, IE ... ou un éditeur XML gérant correctement le CharSet ira faire la transcription des Äx ... en caractère lisible, tu devrais te documenter sur ce qu'est un CharSet !
05/01/2009, 12h53
inspecteur rick

Ok, merci pour le renseignement pour libérer un objet.

En effet, IE lit parfaitement mon xml que ce soit en UTF-8 ou iso-8859-1.
C'est le logiciel dans lequel je l'importe qui le lis mal.
Quoique ... vu qu'il exporte et réimporte parfaitement ses xml en iso-8859-1.
05/01/2009, 14h54
ShaiLeTroll

Citation:

C'est le logiciel dans lequel je l'importe qui le lis mal

Un autre logiciel, qui n'est pas de ta conception ?

peut-être qu'il ne transcrit que ce CharSet, c'est possible, en tout cas "™" ne pourra jamais passé en "iso-8859-1", tout simplement parce que le caractère n'existe pas dans cette table !
05/01/2009, 15h02
inspecteur rick

Oui, logiciel qui n'est pas de moi.

Par contre, il exporte le "TM" en xml en iso-8859-1. Petit carré lors de la visualisation sous IE et quand je réimporte ce même xml, il retranscrit parfaitement le "TM". Bizarre, non ?
05/01/2009, 17h21
ShaiLeTroll

ça c'est parce qu'il doit forcer en fait le CharSet "Window 1252" qui est une extension de iso-8859-1 \ latin1, en ajoutant les caractères utiles qui manquent ! comme le "™"
05/01/2009, 17h31
inspecteur rick

Et donc je peux y faire quelque chose ou pas. Je dois encoder en quoi pourqu'il reconnaisse mon "TM" ?
11/01/2009, 17h41
inspecteur rick

Ok, merci, j'avais pas compris
Il suffit de mettre encoding en windows-1252 et ca marche

Merci.