array of string und die Performance-Schraube

[alzaimar]

Hi Thornberry, natürlich müsste man Length wegkürzen, aber.... Ach, ich mach einfach einen separaten Thread auf.

Delphi-Quellcode:

x:='';
For i:=0 to sList.Count-1 do x := x+sList[i];

ist nämlich wirklich ca. 30% schneller als:

Delphi-Quellcode:

n:=0;
for i:=0 to sList.Count-1 do Inc (n, Length (sList[i]);
j:=1;
SetLength (x, n);
For i:=0 To sList.Count - 1 do Begin
  sTmp := sList[i];
  l := Length (sTmp);
  Move (sTmp[1], x[j], l);
  inc (j,l);
End;

Und das verstehe ich nicht... Und deshalb: Neuer Threadowitsch