salut,

Voila mon probleme : je construit ma base de donnee paradox suivant le code ci dessous (ca marche tres bien)
Puis je veux en faire une deuxieme et ....

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
20
 
  // on peut créer la base
  FormPrincipale->TableBase->Active = false; // Le composant Table ne doit pas être actif
  FormPrincipale->TableBase->DatabaseName = ""; // laisser vide cherche la base dans le repertoire actuel
  FormPrincipale->TableBase->TableType = ttParadox;
  FormPrincipale->TableBase->TableName = NomBase;
 
  if (!FormPrincipale->TableBase->Exists) // Ne remplace pas une table existante
  {
    FormPrincipale->TableBase->FieldDefs->Add("Numero",ftAutoInc,0,false); // ERREUR
    FormPrincipale->TableBase->FieldDefs->Add("Titre",ftString,100,false);
    FormPrincipale->TableBase->FieldDefs->Add("Auteur",ftString,100,false);
    FormPrincipale->TableBase->FieldDefs->Add("Reference",ftString,100,true);
    FormPrincipale->TableBase->FieldDefs->Add("Clef",ftString,100,true);
    FormPrincipale->TableBase->FieldDefs->Add("Date",ftInteger,0,false);
    //FormPrincipale->TableBase->FieldDefs->Add("Lien",ftString,100,false);
 
    // Maintenant que vous avez spécifié votre choix, création de la table
    FormPrincipale->TableBase->CreateTable();
  }
Message d'erreur = Le champ Numero existe deja ! (Il semble vouloir utiliser la premiere base)


Mais une erreur se produit lorsque je veux créer une deuxieme base. Apparement il faudrait deactiver la premier avant de créer la suivante.
Comme fait on ? "TableBase->Active = false" ne semble pas etre suffisant !

Si qqun sait quel bout de code il me manque pour que je puisse créer autant de base que je veux les une à la suite des autres !
MERCI