使用ADOQUERY如何删除当前记录

Question

没有听说ADOQUERY没有DELETE方法啊.ADOQUEYR.DELETE

Answer 1

ADOQuery1.SQL.Add('delete from 表名 where 条件');

Answer 2

喔，成了。但是为什么DELETE就可以，而DeleteRecords(arCurrent)就不行呢？

Answer 3

不错，可以用SQL来写，但是条件处应该如何写才能表达出当前的记录呢

Answer 4

procedure TForm1.Button1Click(Sender: TObject);
begin
  adoquery1.Close;
  adoquery1.SQL.Clear;
  adoquery1.SQL.Add('select * from 表名');
  adoquery1.SQL.Add('where 字段名='+''''+edit1.Text+'''');
  adoquery1.Open;
  adoquery1.Edit;
  adoquery1.Delete;
  showmessage('成功删除');
end;

Answer 5

其实也就是说,必须有一个字段是要求有唯一性质的,是吧,否则使用WHERE是,一些字段的值有重复,那就不只是删除当前记录了?