Filtre SQL d'AdoQuery selon une variable locale

Bonjour à tous,

Une question surement fort simple pour vous ;)
Il faudrait que je filtre ma TAdoQuery en fonction d'une variable local utilisée dans une de mes unités. Comment dois-je écrire mon code SQL ?

J'ai essayé des truks du genre :

Citation:

---

select * from commande
where Cat = fiche1_commande.cat

---

Bien sur : fiche1_commande est mon unité ou se trouve la variable "cat".

D'avance merci ;)

Salut;

la réponse est dans l'utilisation des paramètres :

Code:

---

1 2	select * from commande where Cat =:varLocal

---

ensuite :

Code:

---

1 2 3 4

ADOQuery1.Close; ADOQuery1.SQL.Params[0].Value := fiche1_commande.cat; ADOQuery1.Open;

---

je crois que c'est tout.

Bon codage.

Tu peut encore formé la requete dynamiquement:

Code:

---

1 2 3 4 5

ADOQuery1.Close; ADOQuery1.SQL.Clear; rsql:= 'select * from commande where Cat =' + varLocal.valu; ADOQuery1.SQL.Add(rsql); ADOQuery1.Open;

---

Citation:

---

Envoyé par hazamor

Tu peut encore formé la requete dynamiquement:

Code:

---

1 2 3 4 5

ADOQuery1.Close; ADOQuery1.SQL.Clear; rsql:= 'select * from commande where Cat =' + varLocal.valu; ADOQuery1.SQL.Add(rsql); ADOQuery1.Open;

---

---

ça ne fonctionne pas! Delphi demande de déclarer la variable 'rsql' de la ligne :

Code:

---

rsql:= 'select * from commande where Cat =' + varLocal.valu;

---

J'ai essayé de remplacer 'rsql' par 'sql' au cas ou il y aurait une faute de frappe mais non!!!



J'ai donc utilisé la méthode fourni par Just-Soft mais là également Delphi me demande de déclarer 'Params' de la ligne :

Code:

---

ADOQuery1.SQL.Params[0].Value := fiche1_commande.cat;

---

Il n'y a aucune procedure commençant par un 'p' aprés : 'ADOQuery1.SQL'

tout simplement parque rsql est une variable string à déclarer
mais

Code:

---

1 2 3 4 5

ADOQuery1.Close; ADOQuery1.SQL.Clear; ADOQuery1.SQL.Add('select * from commande where Cat =' + varLocale); ADOQuery1.Open;

---

doit fonctionner, cependant passer par un paramètre est fortement recommandé , en effet si cat est un entier et varlocale aussi il faudrait écrire
Cat='+inttostr(varlocale)
dans le cas de chaine de car il faudrait soit mettre de " en plus
CAT="'+varlocale+'"'
soit mettre
Cat='+quotedstr(varlocale)
je passe sur les dates et différents formats , les Floats etc ....

Je venais tout juste de comprendre qu'il fallait déclarer 'rsql' en tant que string.

En tout cas : bien vu pour le reste SergioMaster!!!
Tu as deviné juste sur tout : L'ajout de double guillemet, l'utilisation de 'inttostr'.
Impressionné!!! ;)

Maintenant ça fonctionne à merveille :)

J'ai oublié d'ajouter que :

Code:

---

ADOQuery1.Close;

---

m'a générer une erreur alors que :

Code:

---

ADOQuery1.Active:= false;

---

focntionne.
Je ne sais pas trop pourquoi mais bon vu que ça marche :)

Encore merci à tous ;)

Salut

:koi: Tu es sûr ?

Cela m'étonne puisque la méthode Close de TDataSet se résume mettre Active à False.

@+ Claudius