大家帮我看看这这么不能删除一条记录呢?

Question

with ADOQuery1 do
  begin
    close;
    SQL.Clear;
    SQL.Add('delete from data111 where ID =:IDEdit');
    Parameters.ParamByName('IDEdit').Value:=Trim(IDEdit.Text);
    ExecSQL;
  end;
不知道问题在哪儿,选中的记录不能删除,大家帮忙看看哈!

Answer 1

with ADOQuery1 do
  begin
    close;
    SQL.Clear;
    SQL.Add('delete from data111 where ID ='''+IDEdit+''''');
    ExecSQL;
  end;
这样写看看

Answer 2

调试下,看IDEdit.text的值是不是你要删除的哪个值..

Answer 3

SQL.Add('delete from data111 where ID ='''+IDEdit+''')';

Answer 4

SQL.Add('delete from data111 where ID ='''+IDEdit+'''');

Answer 5

wxh8506190
text的值为'',不晓得怎么取不到哦 
风云暴
这个方法不行!谢谢你们的解答

Answer 6

with ADOQuery1 do
  begin
    close;
    SQL.Clear;
    SQL.Add('delete from data111 where ID =:IDEdit');
    Parameters.ParamByName('IDEdit').Value:=Trim(IDEdit.Text);
    ExecSQL;
  end;
-------------------------------------------------------------------
楼主：你的ID如果是VARCHAR则改为：
with ADOQuery1 do
  begin
    close;
    SQL.Clear;
    SQL.Add('delete from data111 where ID ='''+Trim(IDEdit.Text)+'''');
    ExecSQL;
  end;
如果是INTEGER改为:
with ADOQuery1 do
  begin
    close;
    SQL.Clear;
    SQL.Add('delete from data111 where ID ='+Trim(IDEdit.Text));
    ExecSQL;
  end;执行完后,如果你的ADOQuery1设置的是批处理的话,则要数据连接组件COMMIT才行.

Answer 7

实在不行你show(sql)试试，看看你的sql语句那出错了。

Answer 8

SQL.Add('delete from data111 where ID ='''+Trim(IDEdit.Text)+'''');

Answer 9

with ADOQuery1 do
  begin
    close;
    SQL.Clear;
    SQL.Add('delete from data111 where ID =:IDEdit');
    Parameters.ParamByName('IDEdit').Value:=Trim(IDEdit.Text);
    //更新
    ExecSQL;
  end;
缺少更新语句。