如何判定delphi listview 中checkbox 选中数目

Question

如何判断listview中checkbox 选中个数，求高手解救。
貌似没有便捷的法子，需要循环判断
本人新手，希望能有详细代码

Answer 1

 贴一段update代码,我先选中几个checkbox，然后点击button进行如下动作。
 query :=tadoquery.create(nil)；
 query.connection:=form1.adoconnection1;
    for i:=0 to listview1.items.count-1 do
    begin
        query.sql.text :='update name set biaozhi =''1'' where id=:id';
        query.parameters.parambyname('id').value :=listview1.items[i].subitems[0];
        query.execsql
     end;
query.free我需要知道这里选中checkbox多少个，即执行多少次，后面有地方需要用到

Answer 2

哎，我已经搞定了，呵呵
var 
 n:integer;
begin
  n:=0;
   query :=tadoquery.create(nil)；
 query.connection:=form1.adoconnection1;
    for i:=0 to listview1.items.count-1 do
    begin
        query.sql.text :='update name set biaozhi =''1'' where id=:id';
        query.parameters.parambyname('id').value :=listview1.items[i].subitems[0];
        query.execsql
        n:=n+1;
     end;
query.free  
showmessage(inttostr(n));
end;

Answer 3

是的,要用循环
不过你这里的n,就是等于listview1.items.count,并没有判断是否选中呀
另外update语句可以把多句写在一起,最后再执行execsql