怎样清除字符串末尾的回车及换行符？(10分)

苏晴 · 2002-03-01

如题

danliyou · 2002-03-01

请给出具体问题先！！！！！

Sindbad · 2002-03-01

While (sHandle[Length(sHandle)] = #13) or (sHandle[Length(sHandle)] = #10) do
Delete(sHandle, Length(sHandle), 1);

dcsdcs · 2002-03-01

查找替换就可以了，
pos(#13+#10,ssss);
找到地方，然后就采用copy搞定了

天真 · 2002-03-01

replacetext这个函数呀！

苏晴 · 2002-03-01

dfydfufdj#13#10

苏晴 · 2002-03-01

代码:

谢谢各位热心帮助，我用Sindbad的办法实现了要求，即：Delete(s,Length(s),2);
：），所以给Sindbad朋友加7分，其他各位各加一分，因为你们都挺热心的哦！[

]

苏晴 · 2002-03-01