Discussion :

[dekalima]

Rebonjour,

Je souhaite faire une recherche dans une table et que la recherche se fasse dans tout les champs de la table. Or, ici la recherche ne se fait que dans "Client". ( Edit1 est le "Edit" dans lequel le user rentre le mot qu'il souhaite rechercher )

Code :

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

1
2
3
4
5
6
7
8
9
void __fastcall TForm1::Button5Click(TObject *Sender)
{
   if (!Edit1->Text.IsEmpty())  // test pour voir si le Edit est vide
       {
        TLocateOptions Option;  // Creer un objet option
        Option << loCaseInsensitive;  // Rajout de l'option "ne fait pas attention à la casse"
        Table1->Locate("Client",Edit1->Text,Option); // Recherche l'enregistrement suivant les critères
       }
}

1. Comment faire pour que la recherche se fasse dans tout les champs de la table?
   Est-ce qu'automatiquement ça m'affichera plusieurs résultats ( s'il y en a plusieurs )?

thx

[pottiez]

Bonjour,
après un petit coup d’œil sur l'aide de BCB pour la méthode Locate, voici ce qu'on y trouve :

Recherche un enregistrement particulier dans l'ensemble de données et le choisit comme enregistrement en cours.

virtual bool __fastcall Locate(const AnsiString KeyFields, const System::Variant &KeyValues, Db::TLocateOptions Options);

Description

Appelez Locate pour rechercher un enregistrement particulier dans un ensemble de données et positionner le curseur dessus.

KeyFields est une chaîne contenant une liste délimitée par des points-virgules des noms de champs à utiliser pour la recherche.

...

Tu peut donc mettre à la place de ton "Client", la liste de tout les champs dans lequel tu souhaite que la recherche se fasse séparé par des ;

Bonne journée

[dekalima]

Autant pour moi le pire c'est que j'avais consulté l'aide et j'avais pas vu cette ligne...
Toujours est-il que j'ai une erreur :

Code :

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

 Table1->Locate('Client;Produit', Edit1->Text,Option);

J'ai pourtant fait comme expliqué dans l'aide:

Locate('Company;Contact;Phone', VarArrayOf(['Sight Diver', 'P', '408-431-1000']), [loPartialKey]);

Voici les erreurs:
[C++ Avertissement] Unit1.cpp(38): W8098 Constante caractère multi-caractère
[C++ Erreur] Unit1.cpp(38): E2129 Constante caractère trop longue (ou vide)

[pottiez]

C'est parce que tu as mis des simples quote ' au lieu de doubles quote "

[dekalima]

En fait j'avais essayé les doubles quotes, mais j'avais cette erreur ( que j'ai toujours ):

LE projet Project1.exe a provoqué une classe d'exception EVariantInvalidError avec le message 'Argument incorrect'. Processus stoppé utilisez le pas à pas ect

La compilation est OK, mais ça s'affiche au moment ou je lance la recherche...

[pottiez]

Le deuxième paramètre est un Variant, il faut donc transformer ton AnsiString en Variant, ceci devrait suffire :

Code :

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

 Table1->Locate("Client;Produit", Variant(Edit1->Text),Option);

[dekalima]

Malheureusement j'ai toujours le même problème arf

[pottiez]

Que contient ton Edit1 ?

[dekalima]

Que contient ton Edit1 ?

C'est un simple Edit, il contient ce que l'utilisateur voudra rechercher...
ça marchait très bien en fait avec un seul champ, c'est depuis que j'essaye de mettre la recherche sur plusieurs champs que ça plante.

[pottiez]

Apparemment, toujours d'après l'aide de BCB, si tu met plusieurs champs, tu doit mettre autant de valeur que de champs, il faut donc que tu créé un tableau de variant comme dans l'aide, il suffit que tu mette à chaque fois la valeur de ton Edit1

[dekalima]

Héhé, à vrai dire, je ne sais même pas ce que variant veut dire, mais bon je vais voir comment créer un tableau de "variant" donc ...
Si tu as le temps de me donner un exemple, je suis preneur sinon je vais chercher

[pottiez]

Variant est un type, au même titre que l'AnsiString par exemple.

Essaye ce code :

Code :

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

1
2
3
4
Variant locvalues[2]; //Déclaration d'un tableau de Varaiant contenant 2 variable
locvalues[0] = Variant(Edit1->Text);  //Variable 1 d'index 0, on met ce que l'ont cherche pour le premier champs, ici le champ Client
locvalues[1] = Variant(Edit1->Text);  //Variable 2 d'index 1, on met ce que l'ont cherche pour le deuxième champs, ici le champ Produit
Table1->Locate("Client;Produit", VarArrayOf(locvalues, 1),Option);

[dekalima]

ah ok tout simplement en effet...
Bon ben ça compile, pas d'erreur quand je clique sur chercher, mais il ne se passe rien... ( il ne va pas à la ligne qu'il a trouvé comme il faisait avant avec un seul champ j'entends ).

C'est super casse couille ce truc....

[cedni]

Salut

Ben une simple requete sql avec une clause where

[dekalima]

Nan parce que la recherche doit se faire par l'utilisateur en cliquant sur un bouton. Faut pas de requête SQL...

Au final j'ai ça donc :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
void __fastcall TForm1::Button5Click(TObject *Sender)
{
Variant locvalues[2]; //Déclaration d'un tableau de Varaiant contenant 2 variable
locvalues[0] = Variant(Edit1->Text);  //Variable 1 d'index 0, on met ce que l'ont cherche pour le premier champs, ici le champ Client
locvalues[1] = Variant(Edit1->Text);  //Variable 2 d'index 1, on met ce que l'ont cherche pour le deuxième champs, ici le champ Produit
 
   if (!Edit1->Text.IsEmpty())  // test pour voir si le Edit est vide
       {
        TLocateOptions Option;  // Creer un objet option
        Option << loCaseInsensitive;  // Rajout de l'option "ne fait pas attention à la casse"
         Table1->Locate("Client;Produit", VarArrayOf(locvalues, 1),Option); // Recherche l'enregistrement suivant les critères
       }
}

[cedni]

En quoi cliquer sur un bouton empeche t il de faire une requete sql ?

Et si tu me dis que chaque utilisateur recoit des données specifiques , je te reponds que tu as juste à correctement formater ta requete

[dekalima]

Je ne vois pas trop comment mettre une requête SQL dans du C++, j'ai jamais fait ça. Je préfererais trouver pourquoi cette méthode Locate marche pas

[cedni]

Ton table , tu le remplis comment ?

[dekalima]

Cela se fait dans une fonction qui sert à ajouter une ligne dans la table:

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
void __fastcall TForm2::Button1Click(TObject *Sender)    // on clique sur "OK" pour un ajout
{
int ii;
strList->Add(Edit1->Text);         //enregistre ce que l'utilisateur insere dans "client"
if( ComboBox1->ItemIndex != -1 ){strList->Add(ComboBox1->Text);} // records what is inside ComboBox1
strList->Add(Edit2->Text);          //enregistre ce que l'utilisateur insere dans "Produit"
strList->Add(Edit3->Text);         //enregistre ce que l'utilisateur insere dans "Date d'expiration"
 
 
Form1->Table1->Append();
Form1->Table1->Edit();
Form1->Table1->FieldByName("Client")->Value=Edit1->Text;
Form1->Table1->FieldByName("Produit")->Value=ComboBox1->Text;
Form1->Table1->FieldByName("Expiration")->Value=Edit3->Text;
Form1->Table1->FieldByName("Clef")->Value=Edit2->Text;
Form1->Table1->Post();
Close();
}

C'est stocké dans un tableau de strings pour ce que le user met dans les "Edit".

Après au niveau d'un composant j'ai donc un DBGrid, une table et un Datasource.
Ce que je veux faire c'est une recherche sur plusieurs champs et que le résultat de la recherche me renvoie toutes les lignes qui correspondent et pas juste la première dans la liste qui correspond à la recherche...

Je ferais en sorte d'afficher le résultat après dans une autre fiche pour eviter que ça soit le bordel dans mon DBGrid, mais là pour le moment c'est la recherche sur plusieurs champs qui pose problème même si Pottiez m'a beaucoup aidé... et ensuite faire en sorte que ça me sorte pas que la première ligne qui correspond mais toutes celles qui correspondent ... mais bon chaque chose en son temps...

[cedni]

Ce que je voulais dire , c est : où sont stockées tes données ?