delphi - 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可解决构件问题。