怎么使Delphi的ListView 删除一行，同时删除数据库里的数据

来源：百度知道 编辑：UC知道 时间：2024/06/03 06:08:59
怎么使Delphi的ListView 删除一行，同时删除数据库里的数据

if listview1.Selected= nil then exit ;
ListItem := ListView1.Selected;
ListItem.Delete;
删除数据库的SQL语句怎么写啊

var i :integer;

For i:=0 to ListView1.Items.Count-1 do
If ListView1.Items.Item[i].Selected then
begin
ADOQuery1.Close;
ADOQuery1.SQL.Add(Format('delete from 表名 where 字段名=%s',[QuotedStr(ListView1.Items[i].SubItems.strings[0])]));//这里以0为例,你是多少自己改
ADOQuery1.ExecSQL;
ListView1.Items.Delete(i);//删除ListView1里面的相关行
end;

大概是这样,如果不明白可以发信息我

var i :integer;

For i:=0 to ListView1.Items.Count-1 do
If ListView1.Items.Item[i].Selected then
begin
ADOQuery1.Close;
ADOQuery1.SQL.Add(Format('delete from 表名 where 字段名=%s',[QuotedStr(ListView1.Items[i].SubItems.strings[0])]));//这里以0为例,你是多少自己改
ADOQuery1.ExecSQL;
ListView1.Items.Delete(i);//删除ListView1里面的相关行
end;
应该是这样了

这别怪我不知道，因为这是C语言我整不明白。

我也看不懂。。。