delphiListview复选框checkbox实现单选的功能 上传者：jianggc71 2019-05-16 09:16:48上传 RAR文件 194.74KB 热度 65次 有源码有实例，delphiListview复选框checkbox实现单选的功能，代码很精简实用，测试完美！ 下载地址 用户评论 更多下载 下载地址 立即下载 用户评论 码姐姐匿名网友 2019-05-16 09:16:48 有很大的帮助，学习了 码姐姐匿名网友 2019-05-16 09:16:48 不错，正想自己学习一下的 码姐姐匿名网友 2019-05-16 09:16:48 很好，谢谢分享 码姐姐匿名网友 2019-05-16 09:16:48 效果一般，再次点击不能取消单选 码姐姐匿名网友 2019-05-16 09:16:48 把代码改下 就可以实现支持取消的单选框 var myitem:TListItem; MyHItTest:THitTests; i:Integer; begin myitem:=LV_ScreenStrategy.GetItemAt(x,y); MyHItTest:=LV_ScreenStrategy.GetHitTestInfoAt(x,y); if MyHItTest [htonstateicon] then begin exit; end; for i:= 0 to LV_Scree 码姐姐匿名网友 2019-05-16 09:16:48 挺不错的想法，帮我解决了问题 码姐姐匿名网友 2019-05-16 09:16:48 很好，不过不是我要的效果，可以留下供以后参考 码姐姐匿名网友 2019-05-16 09:16:48 有用，要是在具体详细一点就好了 码姐姐匿名网友 2019-05-16 09:16:48 简单好用，收藏了 码姐姐匿名网友 2019-05-16 09:16:48 虽然不是我想要的，不过对楼主这种共享精神表示赞赏！ 发表评论
有很大的帮助，学习了
不错，正想自己学习一下的
很好，谢谢分享
效果一般，再次点击不能取消单选
把代码改下 就可以实现支持取消的单选框 var myitem:TListItem; MyHItTest:THitTests; i:Integer; begin myitem:=LV_ScreenStrategy.GetItemAt(x,y); MyHItTest:=LV_ScreenStrategy.GetHitTestInfoAt(x,y); if MyHItTest [htonstateicon] then begin exit; end; for i:= 0 to LV_Scree
挺不错的想法，帮我解决了问题
很好，不过不是我要的效果，可以留下供以后参考
有用，要是在具体详细一点就好了
简单好用，收藏了
虽然不是我想要的，不过对楼主这种共享精神表示赞赏！