Das Einlesen der Daten erfolgt über eine Schleife, welche in einer 2ten Schleife läuf, und die Daten ins TListview einträgt (via Item.Add).
Hier der 'langsame Code':
Delphi-Quellcode:
for i := 0 to Pred(Handler.GetAllDataSets.Count) do
begin
Source := Handler.GetAllDataSets.Strings[i];
AData := Handler.GetData(Data);
begin
lvListItem := lv.Items.Add;
lvListItem.SubItems.Add(Source);
lvListItem.SubItems.Add(IntToStr(AData));
lvListItem.SubItems.Add(Handler.Interpret(Handler.MyData(AData)));
end;
end;