Discussion :

[Hellgast]

Bonjours a tous !
voila mon problème :
je veux sauvegarder le contenu de mon Memo dans un .txt
sans que le contenue du .txt soit écraser à chaque nouvelle sauvegarde

sauvegarde :

Code :

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

1
2
3
4
5
6
7
8
9
 
void __fastcall TForm1::FormClose(TObject *Sender, TCloseAction &Action)
{
if((Action != caNone) && (Action != caMinimize))
    {
    Memo1->Lines->SaveToFile(StorageFile);
    }
 
}

Chargement .txt :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
void __fastcall TForm1::Button3Click(TObject *Sender)
{
 
 
StoragePath = ExtractFilePath(Application->ExeName);
StorageFile = StoragePath + "convers.txt";
 
     if(FileExists(StorageFile))
    {
      Archive->Show();
      Archive->Memo1->Lines->LoadFromFile("convers.txt") ;
 
 
    }
  else
    {
 
   // Memo1->Lines->SaveToFile("Project1.ini");
    }

[Patrick Seuret]

Si tu veux sauver en incrémental, il faut ouvrir le fichier avec les attributs "écriture" et "append" (le curseur se met tout seul à la fin du fichier):

Code :

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

1
2
3
4
5
6
7
8
9
10
 
  #include <fstream>
  #include <iostream>
  using namespace std;
 
  ofstream  *out=new ofstream(filename.c_str(),ios::app|ios::out);
  if ((out==NULL)||(!(*out))) {
    // Can't create object
    throw Exception("Error opening file");
  }

Ensuite tu peux ajouter du texte à la fin du fichier:

Code :

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

1
2
3
4
 
if (out) {
  (*out)<<Memo1->Text.c_str()<<endl;
}

Et finalement il faut fermer le fichier

Code :

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

1
2
3
4
5
6
 
if (out) {
  out->close();
  delete out; 
  out=null;
}

[Hellgast]

merci sa a l'aire de fonctionner
par contre j'ai remplacer

Code :

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

ofstream(filename.c_str(),ios::app|ios::out);

par

Code :

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

ofstream("convers.txt",ios::app|ios::out);

[Hellgast]

Pour ceux qui veulent charger un fichier dans un Memo/RichEdit :

Code :

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

1
2
3
4
5
6
7
8
9
10
 
if (OpenDialog1->Execute())
{
  for (int i=0; i<OpenDialog1->Files->Count; i++)
  {
     AnsiString chemin = OpenDialog1->Files->Strings[i];
     RichEdit1->Lines->LoadFromFile(chemin) ;
 
  }
}