Inserer retour chariot

exyacc Messages postés 163 Date d'inscription dimanche 20 octobre 2002 Statut Membre Dernière intervention 31 juillet 2008 - 30 juil. 2008 à 11:09
exyacc Messages postés 163 Date d'inscription dimanche 20 octobre 2002 Statut Membre Dernière intervention 31 juillet 2008 - 31 juil. 2008 à 09:38
bonjour,

j'ai un tres gros fichier texte et tout le fichier et sur une ligne... donc j'arrive pas a l'importer avec access ni excel, je voudrais donc ajouter un retour chariot tous les 120 caracteres...
je peux pas ouvrir le fichier sous delphi avec un readln car l ligne est beaucoup trop longue..
j'ai essayé d'utiliser un Tstringlist et un loadfromfile mais si je fais aussitot un savetofile (sans ayant encore fait aucune modif), le savetofile fait un fichier de 200ko alors que l'origine fait 3 mega....
quelqu'un aurait il une methode pour ajouter un retour chariot tous les x caracteres ?

merci

exyacc

2 réponses

Bacterius Messages postés 3792 Date d'inscription samedi 22 décembre 2007 Statut Membre Dernière intervention 3 juin 2016 10
31 juil. 2008 à 00:47
Bonsoir,
une solution à te proposer :

tu découpes ton fichier en plusieurs morceaux
tu fais une boucle sur chacun des fichiers => tous les 120 caractères tu ajoutes un "chr(13)" ou un "#13".

Tape "Split fichier" dans moteur de recherche CS.
Tu devrais trouver ton bonheur :)

La stringlist possède une limite de caractères, essaye toujours avec un RichEdit à la place (si tu veux pas faire les fichiers) ca peut marcher.

Cordialement, Bacterius !
0
exyacc Messages postés 163 Date d'inscription dimanche 20 octobre 2002 Statut Membre Dernière intervention 31 juillet 2008
31 juil. 2008 à 09:38
le fichier fait 3367 ko, si je fait un loadfromfile et aussitôt un savetofile, j'ai un fichier de 204 ko
en utilisant un richedit je monte a 799 ko (y'a du progrès... ;)  )

je vais regarder un prog de split....

merci pour ta réponse.

exyacc
0
Rejoignez-nous