标题?: 让ListView更快的显示数据
关键字: Listview,Virtual,海量数据
分类?: 成功心得
密级?: 公开
(评分: , 回复: 6, 阅读: 312) »»
最近刚刚完成一个项目，用Listview取代难看的DBGrid显示数据。在我的机器上运行正常。一切看起来还不错，但是，且慢。在用户那里用实际数据一显示，我当场晕倒。天哪，区区4000条记录，居然显示了2分钟32秒……
经过试验，发现Listview在插入1000条记录时速度尚可忍受，然后插入速度逐渐变慢。随着记录数的增加，速度越来越慢。
怎么办？使用第三方控件？
正在彷徨无计之际，CSDN和大富翁上的相关帖子让我受到启发。对，就用Virtual模式。
首先研究大家提到的一个Delphi自带的例子，就是{$DELPHI}/Demos/Virtual Listview文件夹下的那个工程。
让Listview进入Virtual模式其实很简单。设置Listview的OwnerData属性为True，然后设置Listview.Items.Count的值，最后在Listview的OnData事件处理方法中给指定Index的Item提供Caption、SubItems等信息即可。
当然，你需要自己管理你要显示的数据。我使用了一个TList类，当然也可以使用数组。
以上是我在自己重新编写的Demo中观察到的。但是，当我依照此思路将其运用到我的项目中时，发现当鼠标在屏幕上移动的时候，Listview本身不停的闪烁，根本无法工作。这是怎么回事？
我在网上寻寻觅觅，但迟迟找不到答案。也动过在大富翁和CSDN上询问的念头，但是又不甘心。
察看TListView的源码，除了看到OnData实际上由系统LVN_GETITEMINFO消息触发外，没有任何可用信息。
仔细对比我写的Demo、Delphi自带的例程和我的项目代码，发现一点重大的不同。那就是，前两者在Ondata事件处理方法中Item.SubItems是用Add方法添加的，而我的项目中是直接给Item.SubItems.CommaText赋值。难道是因为这一点？我作了一些修改，呵呵，大功告成！
经过实测，现在显示4000条复杂纪录只需区区30秒，而这时间主要是花费在数据库（我们的表结构确实存在问题）查询上，相信如果数据库结构得以优化，显示4000条记录需时绝不会超过10秒。
至此，问题得到解决。相信许多正在苦苦寻觅第三方控件的朋友能够由此得到一些启发
