打造Delphi中字符串的replace函数 begin //不同
newp[pn]:=s[sn];
pn:=pn+1;sn:=sn+1;
end;
end;
newp[pn]:=#0;
s:=string(newp); //重置s，替换完成！
end;
end;
其实这是一个基础的数据结构问题，在经常拖放控件编程的今天就全当练习数据结构吧。当然这个函数写的不是最优的，我测试了一下替换一万字的字符串，要半秒种的时间，时间复杂度还是比较高，如果各位有更优的办法，欢迎讨论！ 上一篇：NeHe的opengl教程delphi版(4)----旋转 下一篇：动态生成合计 更多相关文章
|
推荐文章
精彩文章
|
