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

    把空格先替换了，在劈开后再替换回来，如下：

    tmp :=StringReplace(‘出版人:北京java培训’,' ','$_$',[rfReplaceAll]);

      strList.Delimiter := ‘:’;

      strList.DelimitedText := tmp;

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

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

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

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

  strList.Delimiter := ‘:’;

  strList.DelimitedText := tmp;

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

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