Delphi XE2 listview artefacts

Question

Sto usando listview in modalità virtuale vsreport, ho due colonne e dopo aver popolato la lista, selezionare una riga, e quindi selezionare qualche altra riga c'è un artefatto lasciato su una riga precedentemente selezionata, vedi immagine sotto. Come risolvere questo?

e questo è il mio codice che riceve i dati da un array

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

Quando passa il mouse, i manufatti scompaiono. Grazie

Answer 1

L'impostazione della proprietà DoubleBuffered di listview su true risolve il problema degli artefatti.