Aus TTable etwas löschen Fehlermeldung für Query

[GoTo0815]

auch auf die Gefahr hin, dass ich mich ein wenig blöd anstelle:

Delphi-Quellcode:

if MessageDlg('Wirklich löschen?', mtConfirmation, [mbYes, mbNo], 0) = mrYes then
  begin
    with Query_Suchen do
     begin
      active := false;
      sql.clear;
      sql.add('delete from retouren where Kunde = :Kunde');
      ParamCheck := true;
      ParamByName ('Kunde').AsString := Edit7.Text;
      active := true;
      ExecSQL; // Execute kennt er bei mir nicht. Ich glaube das ist aber das gleiche, oder?
     end;
  end;
  Label43.Caption := IntToStr(Query_Suchen.RecordCount);

habe das so versucht, bekomme aber ein Fehler bei EXECSQL der lautet ENoResultSet Fehler beim erstellen des CursorHandles. Die Daten scheinen aber gelöscht zu sein.