Problème de parenthèse

Version imprimable

Salut

J'ai un problème qui va peut-être vous paraître stupide ou évident mais voilà :
Cela fait référence à la fonction de test (voir la question sur le forum :"[Résolu] Faire des test dans une base de donnée") dans cette fonction on doit vérifier si la quantité retirée par l'utilisateur n'est pas supérieur à la quantité présente dans la base de donnée.

Si c'est le cas un simple message s'affiche mais maintenant ce que je voudrais c'est q'une boite de dialogue s'affiche et indique la quantité en stock du produit sélectionné , pour cela j'ai fais :
Code:

1 2 3 4 5 6 7 8 9 10 11 12 int reponse ; reponse = Application->MessageBox("La quantité en stock est de :(ADOQuerySortieStock->FieldByName("StockMini")->AsString)","Quantité en stock insuffisante", MB_OK ); if(reponse == IDOK) { //instructions } else { //instructions }
mais j'obtiens le message d'erreur suivant :
) manquante dans l'appel de fonction.

Je ne vois pas ou elle manque.

Voilà encore une fois désolé pour la question

06/07/2006, 10h49
CGi

Ce sont les guillemets autour de StockMini qui provoque l'erreur.

Si tu veux mettre la valeur de ta requette dans la boîte de dialogue,
il faut d'abord construire la chaine de caractère et la passer ensuite à MessageBox.
06/07/2006, 11h21
kj_83

Salut

Je comprends pas bien ce que tu dis : construire la chaîne de caractère ?

Oui de cette maniere :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
 
int reponse ;
AnsiString message = "La quantité en stock est de : " ;
message += (ADOQuerySortieStock->FieldByName("StockMini")->AsString) ;
reponse = Application->MessageBox(message,"Quantité en stock insuffisante", MB_OK ) ;
if(reponse == IDOK)
{
//instructions
}
else
{
//instructions
}

Salut,
Je pense qu'il faut que tu construise ton Message:
Au lieu de
Code:

1 2 reponse = Application->MessageBox("La quantité en stock est de :(ADOQuerySortieStock->FieldByName("StockMini")->AsString)","Quantité en stock insuffisante", MB_OK );
fait un truc comme ca:
Code:

1 2 3 4 5 AnsiString message message = "La quantité en stock est de :" + (ADOQuerySortieStock->FieldByName("StockMini")->AsString); reponse = Application->MessageBox(message,"Quantité en stock insuffisante",MB_OK);
Je ne sais pas si ta fonction récupérant la donnée dans ta base de données te renvoie un entier ou une AnsiString, attention à ca.

Code:

1
2
3
4
 
AnsiString st;
st = "La quantité en stock est de : " + ADOQuerySortieStock->FieldByName("StockMini")->AsString;
Application->MessageBox(st.c_str(),"Quantité en stock insuffisante", MB_OK );

J'ai fais comme t'a dit mais j'obtiens deux erreur au niveau de cette ligne :

Code:

1
2
reponse = Application->MessageBox(message,"Quantité en stock 
     insuffisante", MB_OK ) ;

erreurs :

Code:

1
2
[C++ Erreur] fensortistock.cpp(60): E2034 Impossible de convertir 'AnsiString' en 'const char *'.
[C++ Erreur] fensortistock.cpp(60): E2342 Mauvaise correspondance de type dans le paramètre 'Text' ('const char *' désiré, 'AnsiString' obtenu).

dans ce cas :

Code:

1
2
 
reponse = Application->MessageBox(message.c_str(),"Quantité en stock insuffisante", MB_OK ) ;

L'instruction ne provoque plus d'erreur mais aucune quantité ne s'affiche .
Je pense que le problème vient du fait que cette instruction se trouve à l'intérieur d'un if qui a comme paramètre :
if(ADOQuerySortieStock->FieldByName("StockMini")->AsString=="")

Mais pour que se soit plus compréhensible voilà mon programme :
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 28 29 30 31 32 33 34 35 36 37 38 AnsiString Quantite_demande = ComboBoxQuantiteSortie->Text ; AnsiString ParamNomProduit ; int Quantite_Disponible = 0 ; AnsiString nomProd = DBLookupComboBoxProdSorti->Text ; ADOQuerySortieStock->SQL->Clear(); ADOQuerySortieStock->SQL->Add("SELECT StockMini FROM tblProduit WHERE NomProduit = '"+nomProd+"'and StockMini>"+(AnsiString)Quantite_demande+" "); ADOQuerySortieStock->Open(); if(ADOQuerySortieStock->FieldByName("StockMini")->AsString=="") { int reponse ; AnsiString message = "La quantité disponible en stock est de : " ; message += (ADOQuerySortieStock->FieldByName("StockMini")->AsString) ; reponse = Application->MessageBox(message.c_str(),"Quantité en stock insuffisante", MB_OK ) ; if(reponse == IDOK) { //instructions } else { //instructions } } else { Quantite_Disponible=ADOQuerySortieStock->FieldByName("StockMini")->AsInteger; //Suite du programmme }
Explication :
Lorsqu'un utilisateur souhaite retirer un produit du stock il faut qu'il donne le nom de ce produit ainsi que la quantité . C'est à ce moment là que ce bout de programme intervient , il faut vérifier que la quantité à retirer n'est pas supérieur à la quantité présente dans la base de donnée.

06/07/2006, 14h17
bandit boy
Je ne connais pas du tout les bases de données, mais pour être sur, fais ce test qu'une seul fois.
Code:

1 2 3 4 5 6 7 8 AnsiString Donnee = ADOQuerySortieStock->FieldByName("StockMini")->AsString; if(Donnee == "") { ... AnsiString message = "La quantité disponible en stock est de : " + Donnee; }
Si ADOQuery te renvoie un AnsiString. Comme ca, tu ne testes qu'une fois et tu réutilise ton résultat après.
07/07/2006, 10h25
kj_83
Salut

Désolé de répondre aussi tard mais le ADOQuery renvoi toujours une valeur NULL.
A mon avis le problème vient du fait que au moment ou l'on veut afficher le contenu de "StockMini" avec :
Code:

1 2 AnsiString message = "La quantité disponible en stock est de : " ; message += (ADOQuerySortieStock->FieldByName("StockMini")->AsString) ;
ADOQuerySortieStock->FieldByName("StockMini")->AsString est égal à NULL
puisque c'est la condition du if.

Voilà si vous avait d'autre explication je suis preneur.

Salut,

Dans le code ci dessous, tu testes la valeur de stock mini et tu regardes si c'est supérieur au stock demandé par l'utilisateur?
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 if(ADOQuerySortieStock->FieldByName("StockMini")->AsString=="") { int reponse ; AnsiString message = "La quantité disponible en stock est de : " ; message += (ADOQuerySortieStock->FieldByName("StockMini")->AsString) ; reponse = Application->MessageBox(message.c_str(),"Quantité en stock insuffisante", MB_OK ) ; if(reponse == IDOK) { //instructions } else { //instructions } }
Si c'est le cas, moi j'aurai fais autrement :
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 28 29 30 31 32 33 34 35 36 37 AnsiString Quantite_demande = ComboBoxQuantiteSortie->Text ; AnsiString ParamNomProduit ; int Quantite_Disponible = 0 ; AnsiString nomProd = DBLookupComboBoxProdSorti->Text ; ADOQuerySortieStock->SQL->Clear(); ADOQuerySortieStock->SQL->Add("SELECT StockMini FROM tblProduit WHERE NomProduit = '"+nomProd+"'and StockMini>"+(AnsiString)Quantite_demande+" "); ADOQuerySortieStock->Open(); if(ADOQuerySortieStock->FieldByName("StockMini")->AsInteger>=StrToInt(Quantite_demande)) { int reponse ; AnsiString message = "La quantité disponible en stock est de : " ; message += (ADOQuerySortieStock->FieldByName("StockMini")->AsString) ; reponse = Application->MessageBox(message.c_str(),"Quantité en stock insuffisante", MB_OK ) ; if(reponse == IDOK) { //instructions } else { //instructions } } else { Quantite_Disponible=ADOQuerySortieStock->FieldByName("StockMini")->AsInteger; //Suite du programmme }
Peut être que je me trompe caremment 8O :roll: mais au niveau de tes tests, je ne vois pas trop ce que tu cherches à faire :oops:

Ce que je comprends, c'est que l'utilisateur entre une quantité désiré, ensuite dans la BD tu compares cette quantité à la quantité restante en stock.

Si la quantité est supérieure, tu affiches un message en précisant que le stock demandé est supérieur au stock mini et qu'il reste autant d'articles en stock.
Si la quantité désirée est inférieure ou égale au stock, tu déduis de ton stock restant la valeur de la quantité désirée par l'utilisateur et tu peux par la suite affiché un message en affichant la quantité restante après "le passage de la commande". (en faisant une requête)....

Enfin j'espère que c'est cela que tu cherches à faire car sinon tu vas devoir l'expliquer :mrgreen:

Bon Courage ;)

07/07/2006, 16h47
kj_83

C'est ça tu as compris .

J'ai essayé ton code mais ça ne donne rien non plus .

Remarque :
Dans la condition du if ce n'est pas plutôt : "<=" que ">=" , c'est juste pour être clair.

Enfin voilà la quantité en stock ne s'affiche toujours pas dans la boîte de dialogue.
08/07/2006, 13h37
kmaniche

Bonjour;

Je tente,

1- Verifi le type de StockMini dans la table de la bd.
2- au lieu d'utiliser Application -> MessageBox ,
Utilise

MessageDlg Par exemple

3- Verifi qu'il existe une valeur dans le champ StockMini de la Table .

@+;)

Salut,

Je viens de faire un petit test rapide et chez moi tout fonctionne !

Le code est celui ci dessous à la différence que j'utilise le composant TQuery au lieu du TADOQuery (cependant, le fonctionnement est identique).

Voici le code :

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
28
29
30
31
32
33
34
35
36
37
38
39
void __fastcall TForm1::Button1Click(TObject *Sender)
{
     AnsiString Quantite_demande = 10 ;
     AnsiString ParamNomProduit ;
     int Quantite_Disponible = 0 ;
     AnsiString nomProd = "Fruit";
     Query->SQL->Clear();
 
     Query->SQL->Add("SELECT StockMini FROM tblProduit WHERE NomProduit = '"+nomProd+"' and StockMini>"+(AnsiString)Quantite_demande+";");
 
      Query->Open();
 
      if(Query->FieldByName("StockMini")->AsInteger>=StrToInt(Quantite_demande))
      {
 
         int reponse ;
         AnsiString message = "La quantité disponible en stock est de : " ;
         message += (Query->FieldByName("StockMini")->AsString) ;
 
         reponse = Application->MessageBox(message.c_str(),"Quantité en stock insuffisante", MB_OK ) ;
         if(reponse == IDOK)
         {
            //instructions
         }
         else
         {
            //instructions
         }
 
 
    }
   else
   {
      Quantite_Disponible=Query->FieldByName("StockMini")->AsInteger;
 
     //Suite du programmme
 
   }
}

A toi de remplacer les Query par les ADOQuery et ne pas oublier de modifier les champs Quantite_Demande ainsi que nomProd car j'y ai mis des valeur afin de pouvoir tester ;)

Comme l'a dis Kmaniche, vérifie dans ta BD le type de StockMini (chez moi je l'ai mis en int).

Voilà! Tiens nous au courant ;)