Sauvegarder un tableau

Version imprimable

10/10/2007, 14h45
El-Diablo-

Sauvegarder un tableau

Bonjour,

J'ai crée un tout petit programme ou l'utilisateur peux ecrire des données dans un tableau, mais comment faire pour que quand l'utilisateur ferme et re-ouvre le programme, les données entrées précédamment soient encore là?

Quel serait la méthode la plus adaptée pour sauvegarder le contenu du tableau (StringGrid).

Merci d'avance.
10/10/2007, 14h56
pottiez

En cherchant un petit peu j'ai trouvé ceci sur le forum :
http://www.developpez.net/forums/sho...d.php?t=415742
10/10/2007, 17h08
El-Diablo-

J'ai plusieurs problèmes avec cette technique.

1. Mon tableau comporte 16 colones et 4 lignes, comment sauvegarder tout cela pour qu'après je puisse le relire au démarrage du programme ? J'arrive très bien a enregistrer en faisant 4 boucles for mais après je ne sait pas comment relire tout ca.

Merci de votre aide !
10/10/2007, 17h14
pottiez

Grace à la même technique et a la fonction LoadToFile cela devrait fonctionner

Salut !

Par exemple :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
 
void __fastcall TForm1::Enregistrer1Click(TObject *Sender)
{
if(SaveDialog1->Execute())
    {
    TStringList *Fichier = new TStringList;
    int NbCol = StringGrid1->ColCount;
    int NbRow = StringGrid1->RowCount;
    Fichier->Add(IntToStr(NbCol));
    Fichier->Add(IntToStr(NbRow));
    for(int y = 0; y < NbRow; y++)
        {
        for(int x=0; x < NbCol; x++)
            {
            Fichier->Add(StringGrid1->Cells[x][y]);
            }
        }
    Fichier->SaveToFile(SaveDialog1->FileName);
    Fichier->Clear();
    delete Fichier;
    }
}

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
 
void __fastcall TForm1::Ouvrir1Click(TObject *Sender)
{
if(OpenDialog1->Execute())
    {
    TStringList *Fichier = new TStringList;
    Fichier->LoadFromFile(OpenDialog1->FileName);
 
    int NbCol = Fichier->Strings[0].ToInt();
    StringGrid1->ColCount = NbCol;
    Fichier->Delete(0);
 
    int NbRow = Fichier->Strings[0].ToInt();
    StringGrid1->RowCount = NbRow;
    Fichier->Delete(0);
    int y;
    int x;
    for(int j = 0; j < Fichier->Count; j++)
        {
        y = j / NbCol;
        x = j % NbCol;
        StringGrid1->Cells[x][y] = Fichier->Strings[j];
        }
    Fichier->Clear();
    delete Fichier;
    }
}

A plus !

12/10/2007, 11h25
El-Diablo-

Merci a vous deux ! Ca fonctionne très bien ! :yaisse2::yaisse2: