[fpc-pascal] string concatenation speed

[Luiz Américo]

Michael Van Canneyt wrote:

> 
>   Len:=0;
>   For I:=X to Y do
>     Inc(Len,Length(L[i]));  // S string, L list.
>   SetLength(S,Len);
>   P:=1;
>   For I:=X to Y do
>     begin
>     T:=L[i];
>     Len:=Length(T);
>     Move(T[1],S[P],Len);
>     inc(P,Len)
>     end;
> 

This is the behavior you get using TStrings.Text property.

See TStrings.GetTextStr function

Luiz