Delphi XE2 artview listview

Question

Używam viewview w trybie wirtualnym vsreport, mam dwie kolumny i po zapełnieniu listy, wybierz jeden wiersz, a następnie wybierz inny wiersz jest artefakt pozostały w poprzednio wybranym wierszu, patrz obrazek poniżej. Jak to naprawić?

i to jest mój kod, który pobiera dane z tablicy

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

Kiedy najechaniu myszką, artefakty znikają. Dzięki

Answer 1

Ustawienie właściwości DoubleBuffered listy na true rozwiązuje problem artefaktów.