如何删除DBGRID中的当前记录（用ADO连接的），请给代码示例，谢谢

Question

如何删除DBGRID中的当前记录（用ADO连接的），请给代码示例，谢谢

Answer 1

1.adotable1.delete;
2.adoquery1.delete;
3.DataSource1.DataSet.Delete ;

Answer 2

adotable1.delete;
2.adoquery1.delete;

Answer 3

直接  delete  就可以

Answer 4

你直接使用delete删除的就是当前记录！

Answer 5

if MessageBox('你确认删除?','确认删除记录',[mb_yes,mb_no],0)then
begin
  ADOQuery1.Delete;
  DBGrid1.Refresh;
end;

Answer 6

if MessageBox(handle,'你确认删除?','确认删除记录',mb_okcancel or mb_iconquestion)=idok then
begin
  ADOQuery1.Delete;
  DBGrid1.Refresh;
end;

Answer 7

Delete 表名 WHERE FKey='as;dfsadf'

Answer 8

没什么提示 这是我的代码
begin
  if messagedlg('确实要删除记录吗?',mtConfirmation,[mbYes, mbNo],0) = mrNo then
    begin
    DataSource1.DataSet.Delete;
    DBGrid1.Refresh;
   end;
 end;
数据库里数据还在，DBGRID的数据也还在

Answer 9

没什么提示 这是我的代码
begin
  if messagedlg('确实要删除记录吗?',mtConfirmation,[mbYes, mbNo],0) = mrYes then
    begin
    DataSource1.DataSet.Delete;
    DBGrid1.Refresh;
   end;
 end;
数据库里数据还在，DBGRID的数据也还在

Answer 10

begin
  if messagedlg('确实要删除记录吗?',mtConfirmation,[mbYes, mbNo],0) = mrYes then
    begin
      adoquery1.delete;
   end;
 end;
如果按確定才刪除

Answer 11

ADOQuery1.Delete;
DBGrid1.Refresh;

Answer 12

移动游标到欲删除记录，用：
adoquery1.DeleteRecords(arcurrent);
DBGrid1.Refresh;