Discussion :

[jeffray03]

Salut tout le monde, j´ai un petit souci avec mon dataset, j´ai crée un dataset, que je voulais remplir avec les données se trouvant dans mon fichier XML, jusque la pas de probleme, mais des lors que je recois des données RUSSE, mon dataset les interprete par les '???', j´utilise Delphi 2009.

quelqu´un a t il une solution, ou avez vous deja eu ce probleme?

PS: pour recuperer les données, je fais :

Code :

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

1
2
 
cds.fieldbyname('correction').asstring := 'Russe';

Merci d´avance pour votre aide.

Eric

[Franck SORIANO]

Quel type de données est-ce que tu as définit pour le champ ?

Si tu veux qu'il contiennent de l'unicode, il faut créer des champs de type ftWideString.
Le type ftString contient de l'Ansi. C'est le type historique compatible avec les versions antérieures à D2009.

[jeffray03]

j´ai testé les 2 variantes, le ftString me donne rien que des '?', alors que
le ftWideString me donne des lettres chinoises a la place des lettres Russes.

[ShaiLeTroll]

Quel est l'encodage dans l'entête XML ?

Cela ressemble à cela ?

Code :

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

<?xml version="1.0" encoding="UTF-8" standalone="yes"?>

tu utilise un XML via TXMLDocument ?

J'utilise plus souvent un TClientDataSet lorsque c'est une utilisation entre mes propres applis vers du Web, c'est facile à coder

[jeffray03]

non je n´utilise pas de xml, j´ai un fichier Text, dans lequel je lis des données ecrites en Russe. lorsque je les applique sur Caption ou ListBox etc..., ca marche sans probleme, mais des lors que je veux les mettre dans un dataset pour ensuite les sauvegarder dans une base de données, cela ne marche pas, j´ai tout simplement des '?' a la place des lettres.
voici l´image de ce que je veux avoir. cela marche mais je ne sais comment.

[jeffray03]

Salut Merci de vos reponses, mais je viens de trouver le probleme sur la page d´embarcadero, c´est un Bug de delphi, qui a été par la nouvelle mise a jour( le 4e je crois).
Merci une fois de plus.

[ShaiLeTroll]

Bon, ce n'est pas clair ton histoire, un coup XML, un coup fichier Texte, bon si c'est résolu par le Patch, c'est bien, il faut avouer que 2009 est la 1ère version UniCode, il logique qu'il y aie quelques bugs !

En même temps, il faut être sur que le Driver et la DB supporte l'UniCode

[jeffray03]

Salut en fait j´utilise XML comme base de données et le fichier texte pour prendre les données a sauvegarder.
Et dans ce fichier texte il ya des Textes ecrits en russe.

Non je croyais que le probleme etait resolu avec la mise a jour, mais tel n´est pas le cas, car je venais de lire sur la page d´embarcadero qu´ils avaient fixé le probleme. mais force est de constater que non.

Toujours preneurs pour les aides SVP.

[jeffray03]

mon fichier XML est bien codé en UTF-8 voici l´entete:

Code :

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

<?xml version="1.0" encoding="UTF-8" standalone="yes"?>

[ShaiLeTroll]

Ah, tu utilises un TClientDataSet pour générer le fichier XML
C'est un truc que je voulais testé aussi, mais ma license XE trial est terminée et ma license 2010 est dans les choux !
Mon aide sera donc purement théorique

Tu lit ton fichier comment ?
Stream ? ReadLn ?

Est-ce un Fichier Unicode ou UTF-8 ?
avec ou sans BOM ?

Utilises-tu des AnsiString, UTF8String, WideString, UnicodeString ou le type par défaut String (unicode en 2009)

utilise bien ftWideString !
TWideStringField.AsString utilise AnsiString ou String ?
As-tu essayé par AsVariant ?

Peut-être un problème de CodePage ?
Tu as parlé d'un Bug, URL svp !

Edit : J'ai testé avec Delphi 6 + TNT Controls
(on ne peut vraiment comparé mais cela donne un éclairage que du point vue Objet cela fonctionne depuis longtemps !)

J'ai écrit "Bonjour" ce qui donne "Привет"

Code :

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

ClientDataSet.FieldByName('Champ5').AsVariant := UTF8Decode('Привет');

J'ai bien 6 ? écrit dans mon DBGrid (je suis Ansi évidemment)
J'ai bien 6 ? dans mon TDBEdit
J'ai bien "Привет" dans mon TTntDBEdit (Lib TNT pour gérer l'UniCode)
J'ai bien "Привет" dans mon TTntDBGrid même si c'est un peu capricieux (parfois cela affiche des carrés noirs, parfois le texte comme ça devrait)

dans le XML
Par Echappement

Code :

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

Champ5="Привет"

Par UTF-8

Code :

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

Champ5="Привет"

En Delphi 6, cela fonctionne déjà correctement

[jeffray03]

Salut ShaiLeTroll,
tu as raison, le probleme venait en fait du fait que mon Delphi n´etait pas compatible avec l´unicode, j´ai du copier des caracteres Russes dans mon fichier Delphi et appuyer sur sauvegarder et c´est la qu´il me que je veux savegarder des caracteres UTF-8 et des que j´ai dit oui, alors je n´avais plus de probleme, mais moi je croyais que delphi etait automaquement doté de UTF-8. mais bien est de savoir que ce n´est pas toujours le cas.

Merci de votre aide tres precieuse.

Eric