为啥用TStringList的劈开方法，有空格的串也被劈开了呢？

By 剑魔生 at 6年前 , 16866 次点击

数据：

出版人：张三李四

代码：

Var

strList:TStringList;

strList := TStringList.Create;

strList. Delimiter := ‘:’;

strList. DelimitedText := ‘出版人:张三李四’;

结果：

strList[0] 等于出版人

strList[1] 等于张三

strList[2] 等于李四

2个回复

按时间排按有用数排

花雪泪 6年前

这个是TStrings.SetDelimitedText代码里面自动加空格作为分割符了，要解决这个问题可以把空格先替换了，在劈开后再替换回来，如下：

tmp :=StringReplace(‘出版人:张三李四’,' ','$_$',[rfReplaceAll]);

strList.Delimiter := ‘:’;

strList.DelimitedText := tmp;

key_name := StringReplace(strList[0],'$_$',' ',[rfReplaceAll]);

key_value:= StringReplace(strList[1],'$_$',' ',[rfReplaceAll]);

	itsinoest 6年前 0 把空格先替换了，在劈开后再替换回来，如下： tmp :=StringReplace(‘出版人:北京java培训’,' ','$_$',[rfReplaceAll]); strList.Delimiter := ‘:’; strList.DelimitedText := tmp; key_name := StringReplace(strList[0],'$_$',' ',[rfReplaceAll]); key_value:= StringReplace(strList[1],'$_$',' ',[rfReplaceAll]);

网友回复/评论仅代表其个人看法，并不表明本社区同意其观点或证实其描述。