Question

delphi query 删除语句出错

query1.Close;
query1.SQL.Clear;
query1.SQL.Add('delete from option where op=:op1');
query1.ParamByName('op1').AsString := query1['op1'];
query1.ExecSQL;
每次执行的时候报错
是在是搞不明白，求高手来解答

Answer 1

query1['op1']等同于query1.FieldByName('op1').Value
您的query1数据集中根本不存在op1这个字段，自然就要报错了。
改正：把query1['op1']换成一个具体的值就OK了
query1.ParamByName('op1').AsString :=‘XXX’

追问

那个图片里面的opp1字段是我重新打的，其实和op1是一个字段，我的意思是要删除当前数据段，而不是给定的值，比如我鼠标选中哪一行，就可以删除哪一行，用参数的话怎么解决，求帮忙

追答

那还用什么sql语句啊
query1.delete就可以了
//注意,删除后自动Post了,所以不需要再手工加Post.