2011-08-21 179 views
0

如何將字符串數組轉換爲字符串?還是有其他想法?如何將字符串數組轉換爲字符串?

我這樣做是這樣的:

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次,我不得不這樣做,我怎麼能做到這一點非常短時間..使用數組?請舉例代碼..

+0

看起來像這就是你以後? http://stackoverflow.com/questions/686413/delphi-stringbuilder –

回答

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

是你需要的成語。

你的代碼很慢,因爲它在每次迭代時執行內存分配和複製。這種預先分配緩衝區的方法避免了這種情況。

相關問題