Discussion :

[dekalima]

Bonjour,

Est-ce faisable d'envoyer au tout début d'un document format txt déjà rempli le contenu d'un TStringList?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
   TStringList *head = new TStringList() ;
   head->Add("<!DOCTYPE grammar PUBLIC ""\"-//W3C//DTD GRAMMAR 1.0//EN""\"""\"tasr://teliSpeech/w3c/grammar.dtd""\">");
   head->SaveToFile(OpenDialog1->FileName);

Merci de m'éclairer si c'est faisable!
Thx

[sat83]

En chargeant le contenu de ton fichier dans un TStringList, et en utilisant AddStrings dans un second TStringList:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
  TStringList *l1 = new TStringList() ;
  TStringList *l2 = new TStringList() ;
  l1->LoadFromFile( "C:\\fichier.txt" ) ;
  l2->Clear() ;
  l2->Add( "LIGNE NUMERO 1" ) ;
  l2->AddStrings( l1 ) ;
  l2->SaveToFile( "C:\\NouveauFichier.txt" ) ;
  delete l1;
  delete l2 ;

[dekalima]

Merci à toi encore une fois