如何将字符串数组转换为字符串？

Question

如何将字符串数组转换为字符串？或者其他任何想法？

我这样做：

var
    s:string;
    i:integer;
begin
    for i:=1 to 10000 do
    begin
        if (i mod 2)=0 then
            s:='a'+s
        else
            s:='b'+s;

    end;
end;

正如你所看到i将大数1000或10000或10000所以这意味着10000次我必须这样做，我怎么能这么做很短的时间..使用数组？请举例说明..

Answer 1

SetLength(s, n);
for i := 1 to n do
  s[i] := ...

你需要的成语。

您的代码很慢，因为它会在每次迭代时执行内存分配和复制。这种预先分配缓冲区的方法避免了这种情况。