如何利用Query控件查询出数据后，把数据删除？数据可能有多条。

Question

with query1 do
  begin
    close;sql.clear;
    sql.add('delete from table where 条件');
    open;
  end;

Answer 1

ok: See the Following:
with  query1  do 
    begin 
        close;sql.clear; 
        sql.add('delete  from  table  where  条件'); 
        execsql; 
    end;

Answer 2

cond:=' where 1=1';
  if trim(条件)<>'' then
    cond:=cond+' and 条件='+#39+trim(条件)+#39;

Answer 3

如果用的是ado连接
adoconnetion1.execute('delete  from  table  where  条件',........); 

Answer 4

with Query do
begin
   close;
   sql.clear;
   RequesLive:=true;
   sql.add('delete table where ***');
   execsql;
end;