Comment convertir une requête sql en requête en forme de script sous DELPHI seattle

Code:

---

1 2	SELECT * FROM Chef_de_projet INNER JOIN Projet ON Chef_de_projet.ID_ChefDeProjet = projet.ID_chefdeprojet and (Chef_de_projet.login_chef = valeur)

---

voila j'ai cette requête SQL (SQL serveur 2017 ) qui fonctionne et qui me donne des resultats, sauf que lorsque je l’intégré sur Delphi j'ai un problème voila comment j'ai fais :

Code:

---

1 2 3 4 5 6

ADOQuery3.Close; ADOQuery3.SQL.Clear; rsql_projet:= ('select * from projet where id_chefdeprojet in (select Id_chefdeprojet from chef_de_projet'); ADOQuery3.SQL.Add(rsql_projet); label1.Caption:=rsql_projet; ADOQuery3.Open;

---

celle ci elle marche tant que j'ai pas me de condition WHERE mais une fois je mets LA CONDITION WHERE PAR EXEMPLE :
('select * from projet where id_chefdeprojet in (select Id_chefdeprojet from chef_de_projet WHERE LOGIN_CHEF = VALEUR FROM VARIABLE');

COMMENT FAIRE SVP :? :calim2:

Bonjour,

Une simple erreur de parenthèses :

Code:

---

1 2 3 4

rsql_projet:= 'select * from projet where id_chefdeprojet in (select Id_chefdeprojet from chef_de_projet)';   ADOQuery3.SQL.Clear; ADOQuery3.SQL.Add(rsql_projet);

---

Cordialement

Carmichael

Bonjour,

AMHA il y a plus qu'une simple erreur de parenthèse il y a aussi plusieurs erreurs SQL.

Tout d'abord le SQL de départ contient une jointure ce qui n'est pas écrit dans le programme Delphi.
Ensuite utiliser * est ambiguë aussi bien dans la première proposition SQL (qui fourni soit-disant le bon résultat) que dans sa "traduction" Delphi.
Enfin dans la "traduction" Delphi, je n'aime pas du tout cette utilisation de id_chefdeprojet in (select Id_chefdeprojet from chef_de_projet')
à mon avis le SQL que vous cherchez est

// Tous les chefs de projets ayant un projet

Code:

---

1 2 3 4 5 6 7 8

ADOQuery3.Close; ADOQuery3.SQL.Text:='SELECT * FROM Chef_de_projet c INNER JOIN Projet p ON C.ID_ChefDeProjet = p.ID_chefdeprojet'; // * à remplacer par la liste des colonnes voulues // À noter que je n'ai pas besoin d'utiliser ADOQuery3.SQL.Clear car j'utilise ADOQuery3.SQL.Text // Si toutefois une clause Where était nécessaire je rajouterai ADOQuery3.SQL.Add('WHERE c.login_chef =:valeur'); // requête paramètrée ADOQuery3.Parameters.ParamByName('valeur').asString:= edit1.text ; // renseignement du paramètre ADOQuery3.Open;

---