如果仅仅是删除GRID中,好象是dbgrid1.delete 如果同时要删除库中话要用adoquery1写语法删除 比如with adoquery1 do begin close; sql.clear; sql.add('delete from 表 where 字段=:变量'); 这里变量附值是当前选中的关键字 end; 最后,将dbgrid关联的adoquery进行刷新
隐藏不失为一种好方法, dbgrid1.Columns.Items[1].Visible :=false;从数据源下手也可以: select a,b,c,d from tableselect a,c,d from table //B就没了
可以用主键(索引)关联删除 你点DGgrid的时候就自动返回当前字段的值了啊 你的DBGrid连接query1 id为主键 可以用 with query2 do begin close; sql.clear; sql.add('delete from XXX where id=''+main.fieldbyname('id').asstring+'''); execsql; end
同意上楼.如果是:dbedit,dbgrid可直接用delete
with adoquery1 do begin close; sql.clear; sql.add('delete from 表 where 字段=:'''adoquery1.fieldbyname('字段').asstring''' '); end;
dbgrid1.Columns.Items[1].Visible :=false;
如果同时要删除库中话要用adoquery1写语法删除
比如with adoquery1 do
begin
close;
sql.clear;
sql.add('delete from 表 where 字段=:变量');
这里变量附值是当前选中的关键字
end;
最后,将dbgrid关联的adoquery进行刷新
dbgrid1.Columns.Items[1].Visible :=false;从数据源下手也可以:
select a,b,c,d from tableselect a,c,d from table //B就没了
你点DGgrid的时候就自动返回当前字段的值了啊
你的DBGrid连接query1
id为主键
可以用
with query2 do
begin
close;
sql.clear;
sql.add('delete from XXX where id=''+main.fieldbyname('id').asstring+''');
execsql;
end
begin
close;
sql.clear;
sql.add('delete from 表 where 字段=:'''adoquery1.fieldbyname('字段').asstring''' ');
end;