Écriture d'un CSV en UTF-8

Bonjour,
j'ai écrit avec un TStringList des chaînes dans un fichier texte CSV mais les lettres accentuées sont remplacées par des points d'interrogation dans LibreOffice Calc.
J'ai essayé de passer les chaînes que j'ajoute au TSTringList avec la fonction utf8encode mais bizarrement même résultat.
En ouvrant le fichier que j'ai passé par utf8encode avec Notepad++ je vois qu'il est en Ansi !
On dirait que le TStringList.savetofile n'enregistre qu'en Ansi
Merci de m'aider car là je ne sais plus quoi faire !
Bien cordialement

Bonsoir

Si ça s'affiche correctement sur Notepad++ l'autre chose sur laquelle tu peux agir c'est de comprendre pourquoi LibreOffice force en UTF-8 au lieu de te demander l'encodage à l'ouverture comme le fait OnlyOffice. Peut-être y a-t-il un paramètre quelque part dans Calc ?

ça s'affiche correctement dans Notepad++ car il détecte l'encodage Ansi et l'affiche en Ansi
On peut choisir l'encodage sur LibreOffice Calc mais je le veux en UTF8

Bonjour,

il existe des fonctions de conversion des chaines UTF8
Tu peux traiter le fichier issu du SaveToFile ?

A+
Charly

j'ai essayé avec utf8encode et ansitoutf8 et avec un TStringlist ou avec la procédure sur http://delphipage.free.fr/fichiertexte.html mais c'est toujours en Ansi ! Ces fonctions n'ont aucun effet

Citation:

---

Envoyé par Sylvain255

On dirait que le TStringList.savetofile n'enregistre qu'en Ansi

---

Par défaut mais tu peux forcer l'encodage : SaveToFile('fichier.csv', TEncoding.UTF8);

merci avec ça ça marche

Bonjour,
tu pourrais quand même donner un exemple de ton fichier Csv, pour que je fasse des tests ? en particulier avec des anciennes versions de Delphi.

J'avais déjà eu un problème similaire que j'avais résolu avec UTF8ToAnsi ( et l'inverse doit fonctionner ?)

Merci
A+
Charly

mon code est compliqué mais j'ai Delphi 10.3 et j'ai juste fait :

Code:

---

1 2 3

liste.clear; liste.append(ansitoutf8(motavecaccents)); liste.savetofile('fichier.csv');

---

Citation:

---

Envoyé par Charly910

Bonjour,
tu pourrais quand même donner un exemple de ton fichier Csv, pour que je fasse des tests ? en particulier avec des anciennes versions de Delphi.

J'avais déjà eu un problème similaire que j'avais résolu avec UTF8ToAnsi ( et l'inverse doit fonctionner ?)

Merci
A+
Charly

---

Ok, merci je vais essayer avec D10.4

A+
Charly

Je vais ajouter une précision, SaveToFile('fichier.csv', TEncoding.UTF8); ajoute un BOM en début de Fichier régit par la propriété WriteBOM