Execution une requete Sql sur delphi
Bonjour
je travail sur un SGBD sql server 2012 et sur delphi7 comme EDI
je voulais exécuter une requete SQL et afficher le resultat sur un dbgrid ,toutes est relier (Datasource et Adoquery)
mais le probleme quand je compile le programme une erreur comme celle là (Syntaxe incorrecte vers le mot clé 'Where')
voila mon code source
Code:
1 2 3 4 5 6 7 8 9 10 11 12
|
procedure TFMouvement_art.SpeedButton1Click(Sender: TObject);
begin
with query1 do
begin
sql.Clear;
SQL.Text :='select agent.nom_agent, agent.prénom, art.code_ar, decharge.num_dech, utilisateur.code_utilisateur, utilisateur.nom_util ';
sql.Text:='from agent, art, decharge, ligne_decharge, utilisateur';
sql.Text:='where agent.code_agent=decharge.code_agent and art.code_ar=ligne_decharge.code_ar and decharge.num_dech=ligne_decharge.num_dech and utilisateur.code_utilisateur=decharge.code_utilisateur and art.code_ar='''+dblookupcombobox1.text+'''';
active:=true;
end;
end; |