为啥用TStringList的劈开方法，有空格的串也被劈开了呢？
By 剑魔生 at
5年前
, 15098 次点击
数据：
出版人：张三 李四
代码：
Var
strList:TStringList;
strList := TStringList.Create;
strList. Delimiter := ‘:’;
strList. DelimitedText := ‘出版人:张三 李四’;
结果：
strList[0] 等于出版人
strList[1] 等于张三
strList[2] 等于李四
|
把空格先替换了，在劈开后再替换回来，如下： tmp :=StringReplace(‘出版人:北京java培训’,' ','$_$',[rfReplaceAll]); strList.Delimiter := ‘:’; strList.DelimitedText := tmp; key_name := StringReplace(strList[0],'$_$',' ',[rfReplaceAll]); key_value:= StringReplace(strList[1],'$_$',' ',[rfReplaceAll]);
|
网友回复/评论仅代表其个人看法，并不表明本社区同意其观点或证实其描述。
热门标签
周热点
- 5天前NLPIR-JZSearch智能搜索引擎精准挖掘自然语言 (54)
月热点
- 1周前NLPIR智能Protege知识图谱可视化理解大数据语义 (141)
- 3周前NLPIR自然智能语义实现了从理论到实践的跨越 (126)
- 5天前NLPIR-JZSearch智能搜索引擎精准挖掘自然语言 (54)
这个是TStrings.SetDelimitedText代码里面自动加空格作为分割符了，要解决这个问题可以把空格先替换了，在劈开后再替换回来，如下：
tmp :=StringReplace(‘出版人:张三 李四’,' ','$_$',[rfReplaceAll]);
strList.Delimiter := ‘:’;
strList.DelimitedText := tmp;
key_name := StringReplace(strList[0],'$_$',' ',[rfReplaceAll]);
key_value:= StringReplace(strList[1],'$_$',' ',[rfReplaceAll]);