Einzelnen Beitrag anzeigen

Benutzerbild von Zodi
Zodi

Registriert seit: 18. Jul 2017
Ort: Berlin
45 Beiträge
 
Delphi XE7 Ultimate
 
#1

TListview im Virtual Modus

  Alt 26. Apr 2020, 16:22
Hi Delphianer

Ich befülle eine Lsitview mit ca 1000 Zeilen nun ist es sehr langsam. Ich habe gelesen das man vor dem befüllen ein BeginUpdate und danach ein EndUpdate setzen soll.
Nun ist es aber trotzdem noch langsam.
Danach hab ich bisschen gegoogelt und gelesen man könne ne Listview im VirtualModus verwenden indem man OwnerData auf True setzt.
Leider wird die Listview jetzt aber nicht mehr befüllt.

So hab ich es bisher gemacht mit dem Button Click.

Delphi-Quellcode:
procedure TForm1.BitBtn1Click(Sender: TObject);
var
  Li : TListItem;

begin
   Li := Listview1.Items.Add;
   Li.Caption := 'Text Spalte 1';
   Li.SubItems.Add('Text Spalte 2');
   Li.SubItems.Add('Text Spalte 3');
   Li.SubItems.Add('Text Spalte 4');

   listview1.Items.b
end;
wie muss ich das genau bewerkstelligen mit dem OwnerData damit das funktioniert?

Grüsse Zodi
Pascal
  Mit Zitat antworten Zitat