为啥用TStringList的劈开方法，有空格的串也被劈开了呢？
By 剑魔生 at
6年前
, 12991 次点击
数据：
出版人：张三 李四
代码：
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]);
|
网友回复/评论仅代表其个人看法，并不表明本社区同意其观点或证实其描述。
热门标签
周热点
- 20小时前灵玖软件：NLPIR大数据中文挖掘平台为各个行业赋能 (12)
月热点
- 3周前纠文网论文智能核查融合人工智能和规则技术 (156)
- 2周前纠文网为毕业论文智能修改内容格式 (100)
- 1周前NLPIR大数据挖掘实现了从知识实体到知识图谱 (68)
- 20小时前灵玖软件：NLPIR大数据中文挖掘平台为各个行业赋能 (12)
这个是TStrings.SetDelimitedText代码里面自动加空格作为分割符了，要解决这个问题可以把空格先替换了，在劈开后再替换回来，如下：
tmp :=StringReplace(‘出版人:张三 李四’,' ','$_$',[rfReplaceAll]);
strList.Delimiter := ‘:’;
strList.DelimitedText := tmp;
key_name := StringReplace(strList[0],'$_$',' ',[rfReplaceAll]);
key_value:= StringReplace(strList[1],'$_$',' ',[rfReplaceAll]);