ADOQuery + DBGrid :affichage de données

Bonsoir a tous

j'ai un petit souci sur l'affichage des données sur une dbgrid :


sur ma form j posé un adoconnection , adoquery ,dbgrid,et un datasource pr relier dbgrid et adoquey

un bouton rechercher a pour code :
procedure TForm1.rechercherClick(Sender: TObject);
begin
form1.ADOQuery1.active := false;
form1.adoquery1.SQL.clear;
form1.adoquery1.SQL.add('select CODE_PROJET');
form1.adoquery1.SQL.add ('from PROJET ');
form1.ADOQuery1.Active := true;


end;


on exécutant le code ça donne aucun résultat !!!!ya surement une instruction qui manque ?

auriez vous l'amabilité de venir a mon aide
merci d'avance
cordialement