Firemonkey TListview 行为

【问题标题】：Firemonkey TListview BehavourFiremonkey TListview 行为
【发布时间】：2014-11-19 14:23:01
【问题描述】：

在 Delphi 中使用 TListview 时，如果单击最后一个列表项下方，则选定项变为 nil (itemindex = -1)。

在 Firemonkey 中使用 TListview 时，如果单击最后一个列表项下方，则所选项目是列表中的最后一项。那不是我想要发生的事情。如果单击最后一项下方，则不希望选择任何项。

我很茫然。有没有办法做到这一点，或者我在这里错过了什么或者我不在基地？

谢谢。

【问题讨论】：

【解决方案1】：

问题出在 FindItemAbsoluteAt 过程中的 FMX.ListView.pas 单元，第 4060 行。

这段代码：

if ViewAt >= HeightSums[HeightSums.Count - 1] then
Exit(HeightSums.Count - 1);

用这个代码替换：

if ViewAt >= HeightSums[HeightSums.Count - 1]+GetItemHeight(HeightSums.Count-1) then
Exit(-1);

系统将开始按逻辑运行。

【讨论】：