Ich habe 4 ADOQuerys, deren Inhalt ich nacheinander in ein Listview fülle. Das sieht dann beispielhaft so aus:
Delphi-Quellcode:
mylistview.items.beginupdate;
while not ADOQuery_1.eof do begin
NewItem := Self.mylistview.Items.Add;
NewItem.Caption := ADOQuery_1['Name'];
NewItem.ImageIndex := 1; //Symbol für alle DS aus ADOQuery_1
next;
end;
.
. (Durchlaufen der Querys 2 und 3)
.
while not ADOQuery_4.eof do begin
NewItem := Self.mylistview.Items.Add;
NewItem.Caption := ADOQuery_4['Name'];
NewItem.ImageIndex := 4 //Symbol für alle DS aus ADOQuery_4
next;
end;
mylistview.items.endupdate;
Die Anzahl der Datensätze über alle 4 Querys ist etwa 1500.
Das Füllen dauert bei mir ca. 2 Sek.
Geht das nicht irgendwie schneller ?
