Discussion :

[anthony_fr]

Bonjour

J'utilise Delphi 2009 et je cherche à creer un fichier Batch depuis une listbox qui contient les instructions

Quand je fait listbox.SaveToFile('todo.bat') je perd tous les caractères accentués francais.

Du coup je spécifie l'encodage

Var
Enc: tEncoding;

begin
Enc:=Tencoding.getEncoding(850)
listbox.SaveToFile('todo.bat',Enc)

Cette fois, si je fait un type sous dos de mon fichier, tout est OK, j'ai bien mes caractères avec les accents

Helas, il m'est impossible de lancer c:>todo.bat car il y a au début du fichier la signature de l'encodage (BOM) qui fait planter la premiere ligne

Comment faire donc pour ecrirer dans un fichier todo.bat la chaine "Dir c:\temp\déjà\*.*"

D'avance merci

[Cl@udius]

Salut

Regarde les fonctions de conversion CharToOem, OemToChar ou CharToOemBuff, OemToCharBuff.

@+ Claudius

[ShaiLeTroll]

Vérifie ce que donne TEncoding.ASCII
si cela n'ajoute pas de BOM dans le fichier, il faudrait fouiller pour voir ce qui détermine l'ajout du BOM
Voir la fonction GetPreamble et si il est possible de créer son propre encodage pour retirer le BOM !

ASCII c'est en fait le ANSI Windows, donc Win1252, qui est différent du IBM850

[anthony_fr]

Bonjour et merci a vous

En fait j'avais fait une erreur qui était juste sous mes yeux... comme souvent.

J avais écrit listbox.SaveToFile('todo.bat',Enc.unicode) au lieu de listbox.SaveToFile('todo.bat',Enc)