delphi D10 TListView使用复选框的BUG修改
在安卓下使用TListView时,需要使用到复选框,同时系统定义的几种类型如:ListItemShowCheck、ImageListItemShowCheck等都不能满足功能的需要,所以需要使用自定义显示内容,在定义好后,发现复选框不能正确使用,如下图设置:“ClickOnSelect”…(过程与原因不详说了,没时间,今天直接说结果) 结果发现代码(FMX.ListView.Types文件: TListItemGlyphButton类): procedure TListItemGlyphButton.DoClick; begin inherited; if not FClickOnSelect then FCallback(nil, Self, TListItemCallbackOp.Click); end; inherited; 继承交类的过程,而父类中的代码是FCallback(nil, Self, TListItemCallbackOp.Click);,也就是说,当TListItemGlyphButton.DoClick执行时,如果ClickOnSelect设置为False,则ListView1ButtonClick会执行两次。因些将这里代码做了修改,注释inherited; 。再测试,我自己程序运行正常,因未做更深入测试,目前暂不清楚是否会对其他处理过程具有影响。 经查