Nur gesuchte Datensätze im DBGrid anzeigen

[m-werk]

Code:

procedure TForm1.EditSearchExit(Sender: TObject);
begin
  ADOQuery1.Parameters.ParamByName('name').Value := EditSearch.Text;
  if ADOQuery1.Active then
    ADOQuery1.Refresh
  else
    ADOQuery1.Open;
end;

procedure TForm1.BtnSearchClick(Sender: TObject);
begin
  ADOQuery1.Close;
  ADOQuery1.SQL.Text:='select * from kundendaten, where nachname like :name';
  ADOQuery1.SQL.parameterbyname('name').asstring:=EditSearch.Text;
  ADOQuery1.Open;
end;

Es kommt aber immer noch diese Fehlermeldung bei "parameterbyname" in der Codezeile

Code:

ADOQuery1.SQL.parameterbyname('name').asstring:=EditSearch.Text;