Enregistrer un mémo en UTF-8 sur Delphi 2007

Version imprimable

28/03/2011, 13h40
vedge2000

Enregistrer un mémo en UTF-8 sur Delphi 2007

Bonjour,

j'utilise Delphi 2007 et je dois enregistrer un memo dans un fichier UTF-8.

J'ai pu ajouter les 3 caractères au début du fichier pour signaler que c'est un UTF-8 mais tous mes caractères spéciaux (é, à è, ü,...) s'affiche bizarrement.

Avez-vous une idée?

Salutations et merci d'avance!
28/03/2011, 14h32
ShaiLeTroll

Qu'appele tu bizarrement ?
Les 3 Caractères, c'est le BOM - Byte Order Mark
EF BB BF pour l'UTF8
ensuite é, à è, ü... s'affiche Ã©, Ã*, Ã¨...

Ne pas confondre UTF8 et UTF-16 (charset de WideString)

Dans les Delphi récents, à partir de 2009, tu peux définir sans le SaveToFile du TStrings, le charset
Avant, tu peux écrire dans un TMemoryStream, que tu encode via UTF8Encode vers un TFileStream
28/03/2011, 15h26
vedge2000

Oui exactement.. Tous les caractères avec un accents ne sont pas afficher.

Je veux vraiment de l'UTF-8 car c'est pour un exportation des données pour l'intégrer dans une application Web.

J'ai chercher et trouvé pour Delphi 2009 mais rien pour Delphi 2007.
Je vais essayer.

merci
28/03/2011, 15h58
ShaiLeTroll

En même temps, une application Web peut très bien chargé un fichier latin-1 ou windows-1252 !

Citation:

mais tous mes caractères spéciaux (é, à è, ü,...) s'affiche bizarrement.

Citation:

Tous les caractères avec un accents ne sont pas afficher.

Bizarre ou pas ? Affiché ou pas ? Affiché dans ?

Notepad de WinXP, gère l'ANSI (window-1252), UTF-8 et Unicode, tu peux vérifier avec le contenu de ton fichier
UltraEdit lui te permettra de vérifier le BOM et le contenu Hexadécimal réel !

Quel est ton code d'enregistrement actuel ?
28/03/2011, 16h14
vedge2000

Citation:

En même temps, une application Web peut très bien chargé un fichier latin-1 ou windows-1252 !

On m'impose le UTF-8 :(

Citation:

Bizarre ou pas ? Affiché ou pas ? Affiché dans ?

Affiche comme un caractère spécial. Style '▪'
Je vais regarder avec UltraEdit pour être sûr du fichier texte!

Citation:

Quel est ton code d'enregistrement actuel ?

Le code Delphi?
Pas encore fait, je vais le faire dans un petit moment!
Je te tiendrai au courant!
Merci

Tout est OK!

Merci

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
 
Var
  FS : TFileStream;
  FichierAnsiString :AnsiString;
 
begin
...
  FS := TFileStream.Create(NomFichier, fmCreate);
  FichierAnsiString:= Utf8Encode(Memo1.Text);
  FS.Write(FichierAnsiString[1],Length(FichierAnsiString));
  Fs.Free;
...
end