您的位置: 首页  >  文章  >  将ListView的Chekbox状态应用到子结点

将ListView的Chekbox状态应用到子结点

分类: 文章 • 2024-12-31 17:30:58
前段时间论坛的一个帖子http://topic.****.net/u/20080706/10/24331390-5522-400d-a557-8d719869af68.html，问怎样将TreeView的Chekbox状态应用到子结点，我错看成ListView给答了。当然ListView也可以实现层级递进的树形结构，虽然只是外观上的，不能实现折叠打开的效果，但将Chekbox状态应用到子结点却是能很好的实现的。就像下面的图片所展示的效果：
将ListView的Chekbox状态应用到子结点
实现法也很简单：
  1. //将Item自身的Checked状态应用到下级子项目
  2. procedureCheckSubItems(Item:TListItem);
  3. var
  4. i:Integer;
  5. begin
  6. fori:=Item.Index+1toListView1.Items.Count-1do
  7. ifInteger(ListView1.Items[i].Data)>integer(Item.Data)then
  8. ListView1.Items[i].Checked:=Item.Checked
  9. else
  10. Break;
  11. end;

上面代码中的ListView1.Items[].Data可看作是保存着级别信息（实际上我把用它作其他用途），需要的地方调用
CheckSubItems函数就可以将TListItem的Chekbox状态应用到子结点。
。

相关推荐