Delphi XE2 ListView 工件

Question

我在 vsreport 虚拟模式下使用 ListView ，有两列，在填充列表后，选择一行，然后选择其他行，之前选择的行上留下了一个工件，请参见下图。如何解决这个问题？

这是我从数组获取数据的代码

procedure TForm1.ListView1Data(Sender: TObject; Item: TListItem);
begin
  Item.Caption := FloatToStr(Item.Index + 1);
  Item.SubItems.Add(FloatToStr(a[Item.Index]));
end;

当我将鼠标悬停时，伪像消失了。谢谢

Answer 1

将 ListView 的 DoubleBuffered 属性设置为 true 可以解决工件问题。