Conversion Unix vers DOS...

salut,
j'ai un fichier "texte" de type UNIX, et pour l'utiliser dans un programme, il faut qu'il soit de type DOS.

comment vous faites pour cette transformation ?

j'ai essaye de lire les #10 et #13, mais quand je fais un readln sur mon fichier, il me lit tout mon fichier dans la premiere ligne...

a+

parce que dans les fichier unix la fin de ligne (tq attendue dans readln) n'est pas un #13#10 ... c juste #10 tout seul :cry:

Je viens d'essayer ceci ça a l'air de fonctionner:

Code:

---

1 2 3 4 5 6 7 8 9

procedure TForm1.Button1Click(Sender: TObject); var l: tstringlist; begin l := tstringlist.create; l.loadfromfile('c:\windows\bureau\toto.txt'); l.savetofile('c:\windows\bureau\toto2.txt'); l.free; end;

---

toto.txt est un fichier au format UNIX : si je l'ouvre avec le bloc-notes, toutes les lignes qu'il contient sont toutes sur la même ligne
toto2.txt a été généré d'après toto.txt et lui, si je l'ouvre avec le bloc-notes, j'ai des lignes normales...

Ceci te permet en plus, au lieu de gérer la lecture de toutes les lignes une à une, de faire une lecture en bloc et d'accéder directement à chacune par son numéro (moins un, puisque les index commençant à 0, la première ligne a le numéro 0 (l[0]), la deuxième a le numéro 1, etc...).

merci pour les infos.

en fait, j'ai fait un test sur un autre pc avec D6 perso, du genre j'ouvre le fichier unix, je lis les lignes une a une, et j'affiche chaque ligne dans un memo, et la ca marche sans probleme.... :? :? avec un comptage s'incrementant a chaque ligne...alors qu'avant, il ne me detectait qu'une seule ligne....moi toujours pas compris....mais bon ca marche maintenant...jusqu'a la prochaine fois....

a+

Ça marche nickel pour moi
Merci!