Delphi XE2 Listview Artefakte

Question

Ich benutze Listview im virtuellen Modus vsreport, habe zwei Spalten und nachdem ich die Liste auffüllen, wählen Sie eine Zeile, und wählen Sie eine andere Zeile dort ist ein Artefakt links auf einer zuvor ausgewählten Zeile, siehe Bild unten. Wie behebe ich das?

und dies ist mein Code, der die Daten aus einem Array bekommt

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

Wenn ich die Maus bewegen, verschwinden die Artefakte. Danke

Answer 1

Wenn Sie die DoubleBuffered-Eigenschaft des Listview auf true setzen, wird das Artefaktproblem gelöst.