Discussion :

[bullrot]

Bonsoir a tous.

J'ai créer un formulaire ( un enregistrement de clients ) qui stock son nom prenom, etc... dans une base de donnée.

Je voudrais que lorsque je clic sur le bouton valider que le programme recherche dans la base de donnée pour savoir si il n'existe pas deja par exemple : dupont qui est deja créer.

J'ai lu dans le tuto qu'il fallait utiliser la comande Tquery mais je suis bloquer apres.

Si vous pouvez m'eclairer un peu

merci

[Auteur]

bonjour,

le TQuery te permet d'exécuter des requêtes SQL. Avec la méthode Add() on place le texte de la requête (AnsiString).


Voilà un exemple (il doit y a voir des fautes de frappe ) :

Code c++ :

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
 
int n;
 
Query->SQL->Clear();   // on vide le contenu
Query->SQL->Add("SELECT * FROM ':nomBase:nomTable'");
Query->SQL->Add("WHERE NOM='Dupont'");
try
{
    Query->Open();  // exécution de la requête
 
     n = Query->RecordCount;  // nombre d'enregistrements
     if (n!=0)
            MessageBox(this->Handle, "Au moins un nom trouvé !", "Résultat de la requête", MB_OK);
}
catch(...)
{
    MessageBox(this->Handle, "Erreur", "", MB_OK);
}

nomBase est le nom de la base de la table :

Code C++ :

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

1
2
 
Table->DatabaseName

nomTable est le nom de la table

Code c++ :

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

1
2
 
Table->TableName

Il te faudra sans doute faire des concaténations de chaines de caractères.


Attention : il y a la méthode Query->Open() et la méthode Query->ExecSQL() (j'ai un doute sur la syntaxe).
En fonction de la requête, il faudra utiliser soit l'une soit l'autre méthode.

[ero-sennin]

Salut,

Le TQuery, comme l'a dit Auteur, permet d'exécuter une requête SQL.
Il faut renseigné la propriété DataBaseName et lui dire le nom de la base de donnée que tu utilises.

Une fois fait, tu renseignes la requêtes à faire et tu l'exécutes.


Par Exemple :

Code :

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

1
2
3
4
5
6
7
Query1->SQL->Clear();
Query1->SQL->Add("Select * from MaTable Where nom=:leNom"); 
// On définit la valeur du paramètre leNom
Query1->ParamByName("leNom")->AsString="Dupond";
// On exécute la requête
//(ExecSQL s'utilise pour des Insert,Delete,Update et create table).
Query1->Open();

Maintenant, on regarde si on a un enregistrement qui nous a été retourné.

Code :

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

1
2
3
4
if (Query1->RecordCount > 0)
  ShowMessage("Ce nom est déjà présent dans la base de données")
  else
  //traitement

Voilà
En espérant t'avoir aidé

[bullrot]

ca ne marche pas avec une base de donnée paradox 7.0 ?

[Auteur]

ca ne marche pas avec une base de donnée paradox 7.0 ?

euh si... Ce sont les formats que j'utilise.

[Bily.sdi]

il y a aussi cette maniere aussi si tu recherche un enregistrement.
si ce n'est pas une cle primaire tu met ce code dans une boucle dont la
condition sera : tant que locate(...) == true

Code :

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

1
2
3
4
5
6
7
8
    FORCE->Text="";
   SAYEN->Text = "vegeta";
 
   TLocateOptions Option;
 
  if ( Table2->Locate("NOM",SAYEN->Text,Option) == true )
 
     FORCE->Text = Table2->FieldByName("FORCE")->AsString;

@+