Discussion :

[androz]

Bonjour à tous !

j'ai développé une petite application qui me permet de gérer un portefeuille. J'ai donc utilisé pour cela une base de données dans laquelle est répertoriée un certain nombre de champs.
J'ai créé ma base de données PARADOX en suivant le tutoriel présenté dans la liste des tutos de BB6 et j'avoue que cela m'a été d'une très grande utilité !
Les composants que j'utilise sont donc un TTable, un DBGrid pour l'afficher et un TDataSource pour lier la TTable à la DBGrid.

Maintenant, j'aimerais pouvoir sauvegarder mes données en format texte ou excel ou autre. J'aimerais aussi être capable d'importer des données d'une base de données existante. Comment puis-je faire ?

[androz]

rebijour,

bon, j'ai trouvé comment je pouvais "ouvrir" une base de données en faisant comme ceci :

Code :

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

1
2
3
4
5
6
7
 
if(OpenDialog1->Execute())
{
     Table->TableName = OpenDialog1->FileName;
     DBGrid1->Visible = true;
     Table->Active = true;
}

Deux questions restent en sus....

* La méthode que j'emploie fonctionne très bien, mais cela suppose que la base de données existe déjà. Comment pourrais-je faire pour en créer une nouvelle sur le même pattern (mêmes colonnes) sachant que ma BD a été créée avec le DataBase Desktop de BB ?

* Sauvegarder la BD ne sert à rien apparemment puisqu'en utilisant le composant TTable ça le fait au fur et à mesure on dirait. Seulement, y aurait-il un moyen de sauvegarder les éléments de la BD (dans un fichier texte par exemple importable sous excel pour dire qqch) autrement que de façon brute ligne par ligne ? Et y aurait-il de la même manière un moyen d'importer des données d'un fichier texte ?

Merci pour vos suggestions !

[androz]

Encore moi
C'est marrant je fais les questions et les réponses.... j'avance donc.
J'ai trouvé une solution pour créer de nouvelles BD sur le même frame.

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
 
   Table->Active = false; // La Table ne doit pas être active
   Table->DatabaseName = "";
   Table->TableType = ttParadox;
 
   Table->TableName = "test";
 
   if (!Table->Exists) // Pour pas écrire par dessus une existante
   {
     Table->FieldDefs->Clear();
     Table->FieldDefs->Add("E1",ftFloat,0,false);
     Table->FieldDefs->Add("E2",ftString,15,false);
     .......
     Table->CreateTable();
   }
   DBGrid1->Visible = true;
   Table->Active = true;

Reste toujours la question sur l'exportation/importation au format texte
Des volontaires ???