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

1var

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为例,你是若干本身改

end

ListView1.Items.Delete(i)//删除ListView1琅绫擎的相干行

ADOQuery1.ExecSQL

应当是如许了

简单说下思路。

获取控件 ListView 里选中的一行，可以在窗体设计界面双击该控件，在事件代码里使用

if (this.lvwXianShi.SelectedItems.Count >0)

判断是否选中了一行以上，如果是选中了一行，就获取该行的数据信息，然后，

连接数据库删除指定的数据。

如果你的删除 *** 作不直接改变数据库里边的数据就直接对Listview的Item *** 作，如果是直接删除数据库里面的数据那就对数据库 *** 作之后再绑定，刷新吗就是重新绑定下咯，对于删除 *** 作当然是要确定你选择的Item的Key（就是你的唯一标识）才能正确删除你选择的项

---