[Delphi/SQL] : Probleme ADOQuery / syntaxe

Salut petit probleme DELPHI/SQL

---- Code source ----

procedure TForm2.ListBox1Click(Sender: TObject);
var
i:integer;
begin
{Requete pour l'affichage du détaile}
i:=ListBox1.ItemIndex;
showmessage(Listbox1.Items[i]);
ADOquery1.SQL.Add('SELECT * FROM delph_site WHERE nom_site=:a');
ADOquery1.Parameters[0].Value:=Listbox1.Items[i];
ADOquery1.Open;
edit6.Text:=ADOquery1.Fields.Fields[0].AsString;


{Afficher les détails pour le site selectionner, dans l'objet}
end;

------

Ca me dit errreur syntaxe SQL prés de SELECT * From delph_site Where nom_site='ours_brun'

Pouvez vous m'éclairer svp ?